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GETTING STARTED WITH YOUR APPLE II 


Unpacking 


Don't throw. away the packing material. Save it for the unlikely 
event that you may need to return your Apple II for warrantee repair. 
If you bought an Apple II Board only, see hardware section in this 
manual on how to get started. You should have received the following: 


1. Apple II system including mother printed circuit board 
with specified amount of RAM memory and 8K of ROM memory, 
Switching power supply, keyboard, and case assembly. 


2. Accessories Box including the following: 


a. This manual including warranty card. 
b. Pair of Game Paddles 
c. A.C. Power Cord 
d. Cassette tape with "Breakout"on one side 
and "Color Demos" on the other side. 
e. Cassette recorder interface cable (miniature 


phone jack type) 


3. If you purchased a 16K or larger system, your accessory 
box should also contain: 
a. 16K Startrek game cassette with High Resolution 
Graphics Demo ("HIRES") on the flipside. 
b. Applesoft Floating Point Basic Language Cassette 
with an example program on the other side. 
c. Applesoft reference manual 


4. In addition other items such as a vinyl carrying case 
or hobby board peripherial may have been included if 
specifically ordered as "extras". 


Notify your dealer or Apple Computer, Inc. immediately if you are 
missing any items. 


Warranty Registration Card 


Fill this card out immediately and completely and mail to Apple in 
order to register for one year warranty and to be placed on 

owners club mailing list. Your Apple II's serial number is located 
on the bottom near the rear edge. You model number is: 


A2SOQMMX 
MM is the amount of memory you purchased. For Example: 


A2S9GG8X 
Ts an 8K Byte Apple II system. 


Check for Damage 


Inspect the outside case of your Apple for shipping damage. Gently 
lift up on the top rear of the lid of the case to release the lid 
Snaps and remove the lid. Inspect the inside. Nothing should be 
loose and rattling around. Gently press down on each integrated 
circuit to make sure that each is still firmly seated in its 
socket. Plug in your game paddles into the Apple II board at the 
socket marked "GAME I/0" at location J14. See hardware section of 
this manual for additional detail. The white dot on the connector 
Should be face forward. Be careful as this connector is fragile. 
Replace the lid and press on the back top of it to re-snap it into 
place. 


Power Up 


First, make sure that the power ON/OFF switch on the rear power 
supply panel on your Apple II is in the "OFF" position. Connect 
the A.C. power cord to the Apple and to a 3 wire 120 volt A.C. 
outlet. Make sure that you connect the third wire to ground if 
you have only a two conductor house wiring system. This ground 
is for your safety if there is an internal failure in the Apple 
power supply, minimizes the chance of static damage to the Apple, 
and minimizes RFI problems. 


Connect a cable from the video output jack on the back of the Apple 
to a TV set with a direct video input jack. This type of set is 
commonly called a "Monitor". If your set does not have a direct 
video input, it is possible to modify your existing set. Write for 
Apple's Application note on this. Optionally you may connect the 
Apple to the antenna terminals of your TV if you use a modulator. 
See additional details in the hardware section of this manual under 
"Interfacing with the Home TV". 


Now turn on the power switch on the back of the Apple. The indicator 
light (it's not a switch) on the keyboard should now be ON. If 

not, check A.C. connections. Press and release the "Reset" button 

on the keyboard. The following should happen: the Apple's’ internal 
speaker should beep, an asterisk ("*") prompt character should appear 
at the lower left hand corner of your TV, and a flashing white square 
should appear just to the right of the asterisk. The rest of the 

TV screen will be made up of radom text characters (typically question marks). 


If the Apple beeps and garbage appears but you cannot see an "*" and the 
cursor,. the horizontal or vertical height settings on the TV need to be 
adjusted. Now depress and release the "ESC" key, then hold down the 
"SHIFT" key while depressing and releasing the P key. This should 

clear your TV screen to all black. Now depress and release the "RESET" 
key again. The "*" prompt character and the cursor should return to 

the lower left of your TV screen. 


Apple Speaks Several Languages 


The prompt character indicates which language your Apple is currently 
in. The current prompt character, an asterisk ("*"), indicates that 
you are in the "Monitor" language, a powerful machine level language 
for advanced programmers. Details of this language are in the 
"Firmware" section of this manual. 


Apple Integer BASIC 


Apple also contains a high level English oriented language called 
Integer BASIC, permanently in its ROM memory. To switch to this 
language hold down the "CTRL" key while depressing and releasing the 
"B" key. This is called a control-B function and is similiar to 

the use of the shift key in that it indicates a different function 
to the Apple. Control key functions are not displayed on your 

TV screen but the Apple still gets the message. Now depress and 
release the "RETURN" key to tell Apple that you have finished typing 
a line on the keyboard. A right facing arrow (">") called a caret 
will now appear as the prompt character to indicate that Apple is 
now in its Interger BASIC language mode. 


Running Your First and Second Program 


Read through the next three sections that include: 


1. Loading a BASIC program Tape 
2. Breakout Game Tape 
3. Color Demo Tape 


Then load and run each program tape. Additional information on 
Apple II's interger BASIC is in the next section of this manual. 


Running 16K Startrek 


If you have 16K Bytes or larger memory in your Apple, you will also 
receive a "STARTREK" game tape. Load this program just as you did 
the previous two, but before you "RUN" it, type in "HIMEM: 16384" 
to set exactly where in memory this program is to run. 


LOADING A PROGRAM TAPE 


INTRODUCTION 

This section describes a procedure for loading BASIC programs 
successfully into the Apple II. The process of loading a program is divided 
into three section; System Checkout, Loading a Tape and What to do when 
you have Loading Problems. They are discussed below. 


When loading a tape, the Apple II needs a signal of about 2 1/2 to 5 
volts peak-to-peak. Commonly, this signal is obtained from the "Monitor" 
or "earphone" output jack on the tape recorder. Inside most tape recorders, 
this signal is derived from the tape recorder's speaker. One can take 
advantage of this fact when setting the volume levels. Using an Apple 
Computer pre-recorded tape, and with all cables disconnected, play the tape 
and adjust the volume to a loud but un-distorted level. You will find that 
this volume setting will be quite close to the optimum setting. 


Some tape recorders (mostly those intended for use with hi-fi sets) 
do not have an "earphone" or high-level "monitor" output. These machines 
have outputs labeled "line output” for connection to the power amplifier. 
The signal levels at these outputs are too low for the Apple II in most cases. 


Cassette tape recorders in the $49 - $59 range generally have ALC 
(Automatic Level Control) for recording from the microphone input. This feature 
is useful since the user doesn't have to set any volume controls to obtain 
a good recording. If you are using a recorder which must be adjusted, it 
will have a level meter or a little light to warn of excessive recording levels. 
Set the recording level to just below the level meter's maximum, or to just a 
dim indication on the level lamp. Listen to the recorded tape after you've 
saved a program to ensure that the recording is “loud and clear". 


Apple Computer has found that an occasional tape recorder will not function 
properly when both Input and Output cables are plugged in at the same time. 
This problem has been traced to a ground loop in the tape recorder itself which 
prevents making a good recording when saving a program. The easiest solution 
is to unplug the "monitor" output when recording. This ground loop does not 
influence the system when loading a pre-recorded tape. 


Tape recorder head alignment is the most common source of tape recorder 
problems. If the playback head is skewed, then high frequency information 
on pre-recorded tapes is lost and all sorts of errors will result. To confirm 
that head alignment is the problem, write a short program in BASIC. >10 END 
is sufficient. Then save this program. And then rewind and load the program. 
If you can accomplish this easily but cannot load pre-recorded tapes, then 
head alignment problems are indicated. 


Apple Computer pre-recorded tapes are made on the highest quality professional 
duplicating machines, and these tapes may be used by the service technician to 
align the tape recorder's heads. The frequency response of the tape recorder 
should be fairly good; the 6 KHz tone should be not more than 3 db down from 
a 1 KHz tone, and a 9 KHz tone should be no more than 9 db down. Note that 
recordings you have made yourself with mis-aligned heads may not not play 
properly with the heads properly aligned. If you made a recording with a 
skewed record head, then the tiny magnetic fields on the tape will be skewed as 
well, thus playing back properly only when the skew on the tape exactly matches 
the skew of the tape recorder's heads. If you have saved valuable programs with 
a skewed tape recorder, then borrow another tape recorder, load the programs with 
the old tape recorder into the Apple, then save them on the borrowed machine. 
Then have your tape recorder properly aligned. 


Listening to the tape can help solve other problems as well. Flaws in the 
tape, excessive speed variations, and distortion can be detected this way. 
Saving a program several times in a row iS good insurance against tape flaws. 
Qne thing to listen for is a good clean tone lasting for at least 3 1/2 seconds 
is needed by the computer to "set up" for proper loading. The Apple puts out 
this tone for anout 19 seconds when saving a program, so you normally have 
6 1/2 seconds of leeway. If the playback volume is too high, you may pick up tape 
noise before getting to the set-up tone. Try a lower playback volume. 


SYSTEM CHECKOUT 


A quick check of the Apple II computer system will help you spot any 
problems that might be due to improperly placed or missing connections between 
the Apple II, the cassette interface, the Video display, and the game 
paddies. This checkout procedure takes just a few seconds to perform and 
is a good way of insuring that everything is properly connected before the 
power is turned on. 


POWER TO APPLE - check that the AC power cord is plugged 
into an appropriate wall socket, which includes a "true" 
ground and is connected to the Apple II. 


CASSETTE INTERFACE - check that at least one cassette 
cable double ended with miniature phone tip jacks is 
connected between the Apple II cassette Input port and 
the tape recorder's MONITOR plug socket. 


VIDEO DISPLAY INTERFACE - 


a) for a video monitor - check that a cable connects 
the monitor to the Apple's video output port. 
b) for a standard television - check that an adapter 


(RF modulator) is plugged into the Apple II (either 
in the video output (K 14) or the video auxillary 
socket (J148), and that a cable runs between the 
television and the Adapter's output socket. 


GAME PADDLE INTERFACE - if paddles are to be used, check 
that they are connected into the Game I/0 connector (J14) 
on the right-hand side of the Apple II mainboard. . 


POWER ON - flip on the power switch in back of the Apple II, 
the "power" indicator on the keyboard will light. Also 
make sure the video monitor (or TV set) is turned on. 


After the Apple II system has been powered up and the video display 
presents a random matrix of question marks or other text characters the 
following procedure can be followed to load a BASIC program tape: 


1. 


Hit the RESET key. 

An asterick, "*",should appear on the lefthand side 

of the screen below the random text pattern. A flashing 
white cursor will appear to the right of the asterick. 


Hold down the CTRL key, depress and release the B key, 
then depress the "RETURN" key and release the "CTRL" key. 
A right facing arrow should appear on the lefthand side 
of the screen with a flashing cursor next to it. If it 
doesn't, repeat steps 1 and 2. 


Type in the word "LOAD" on the keyboard. You should see 
the word in between the right facing arrow and the 


flashing cursor. Do not depress the "RETURN" key yet. 


Insert the program cassette into the tape recorder and 
rewind it. 


If not already set, adjust the Volume control to 59-70% 
maximum. If present, adjust the Tone control to 80-100% 
maximum. 


6. Start the tape recorder in "PLAY" mode and now depress 
the "RETURN" key on the Apple II. 


7. The cursor will disappear and Apple II will beep in a 
few seconds when it finds the beginning of the program. 
If an error message is flashed on the screen, proceed 
through the steps listed in the Tape Problem section 
of this paper. 


8. A second beep will sound and the flashing cursor will 
reappear after the program has been successfully loaded 
into the computer. 


9, Stop the tape recorder. You may want to rewind the program 
tape at this time. 


10. Type in the word "RUN" and depress the "RETURN" key. 


The steps in loading a program have been completed and if everying has 
gone satisfactorily the program will be operating now. 


LOADING PROBLEMS 

Occasionally, while attempting to load a BASIC program Apple II 
beeps and a memory full error is written on the screen. At this time 
you might wonder what is wrong with the computer, with the program tape, 
or with the cassette recorder. Stop. This is the time when you need 
to take a moment and checkout the system rather than haphazardly attempt- 
ing to resolve the loading problem. Thoughtful action taken here will 
speed in a program's entry. If you were able to successfully turn on the 
computer, reset it, and place it into BASIC then the Apple II is probably 
operating correctly. Before describing a procedure for resolving this 
loading problem, a discussion of what a memory full error is in order. 

The memory full error displayed upon loading a program indicates that 
not enough (RAM) memory workspace is available to contain the incoming data. 
How does the computer know this? Information contained in the beginning of 
the program tape declares the record length of the program. The computer 
reads this data first and checks it with the amount of free memory. If 
adequate workspace is available program loading continues. If not, the 
computer beeps to indicate a problem, displays a memory full error statement, 
stops the loading procedure, and returns command of the system to the key- 
board. Several reasons emerge as the cause of this problem. 


Memory Size too Small 


Attempting to load a 16K program into a 4K Apple II will generate this 
kind of error message. It is called loading too large of a program. The 
solution is straight forward: only load appropriately sized programs into 
suitably sized systems. 

Another possible reason for an error message is that the memory pointers 
which indicate the bounds of available memory have been preset to a smaller 
capacity. This could have happened through previous usage of the "HIMEN:" 
and "LOMEN:" statements. The solution is to reset the pointers by Bo (CTRL B) 
command. Hold the CTRL key down, depress and release the B key, then depress 
the RETURN key and release the CTRL key. This will reset the system to max- 
imum capacity. 


Cassette Recorder Inadjustment 

If the Volume and Tone controls on the cassette recorder are not 
properly set a memory full error can occur. The solution is to adjust 
the Volume to 59-79% maximum and the Tone (if it exists) to 89-199% 
maximum. * 

A second common recorder problem is skewed head azimuth. When 
the tape head is not exactly perpendicular to the edges of the magnetic 
tape some of the high frequency data on tape can be skipped. This causes 
missing bits in the data sent to the computer. Since the first data read 
is record length an error here could cause a memory full error to be 
generated because the length of the record is inaccurate. The solution: 
adjust tape head azimuth. It is recommended that a competent technician 
at a local stereo shop perform this operation. 
Often times new cassette recorders will not need this adjustment. 


*Apple Computer Inc. has tested many types of cassette recorders and so far 
the Panasonic RQ-399 DS (less than $49.99) has an excellent track record 
for program loading. 


Tape Problems 

A memory full error can result from unintentional noise existing in 
a program tape. This can be the result of a program tape starting on its | 
header which sometimes causes a glitch going from a nonmagnetic to magnetic 
recording surface and is interpreted by the computer as the record length. 
Or, the program tape can be defective due to false erasure, imperfections 
in the tape, or physical damage. The solution is to take a moment and 
listen to the tape. If any imperfections are heard then replacement of the 
tape is called for. Listening to the tape assures that you know what a 
"good" program tape sounds like. If you have any questions about this please 
contact your local dealer or Apple for assistance. 


If noise or a glitch is heard at the beginning of a tape advance the 
tape to the start of the program and re-Load the tape. 


Dealing with the Loading Problem 

With the understanding of what a memory full error is an efficient way 
of dealing with program tape loading problems is to perform the following 
procedure: 


1. Check the program tape for its memory requirements. 
Be sure that you have a large enough system. 


2. Before loading a program reset the memory pointers 
with the B. (control B) command. 


3. In special cases have the tape head azimuth 
checked and adjusted. 


4. Check the program tape by listening to it. 
a) Replace it if it is defective, or 
b) start it at the beginning of the program. 
9. Then re-LOAD the program tape into the Apple II. 
In most cases if the preceeding is followed a good tape load will result. 


UNSOLVED PROBLEMS 


If you are having any unsolved loading problems, contact your 
nearest local dealer or Apple Computer Inc. 


BREAKOUT GAME TAPE 


PROGRAM DESCRIPTION 

Breakout is a color graphics game for the Apple II computer. The object of 
the game is to "knock-out' all] 16 colored bricks from the playing field by 
hitting them with the bouncing ball. You direct the ball by hitting it with 
a paddle on the left side of the screen. You control the paddle with one of 
the Apple's Game Paddle controllers. But watch out: you can only miss the 
ball five times: 


There are eight columns of bricks. As you penetrate through the wall the 
point value of the bricks increases. A perfect game is 729 points; after 
five balls have been played the computer will display your score and a 
rating such as "Very Good". “Terrible:", etc. After ten hits of the ball, 
its speed with double, making the game more difficult. If you break through 
to the back wall, the ball will rebound back and forth, racking up points. 


Breakout is a challenging game that tests your concentration, dexterity, 
and skill. 


REQUIREMENTS 


This program will fit into a 4K or greater system. 
BASIC is the programming language used. 


PLAYING BREAKOUT 


l. Load Breakout game following instructions in the "Loading 
a BASIC Program from Tape" section of thts manual. 

2. Enter your name and depress RETURN key. 

3. If you want standard BREAKOUT colors type in Y or Yes 
and hit RETURN. The game will then begin. 

4, If the answer to the previous questions was N or No 


then the available colors will be displayed. The 
player will be asked to choose colors, represented by a 
number from f#’ to 15, for background, even bricks, odd 
bricks, paddle and ball colors. After these have been 
chosen the game will begin. 
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5. At the end of the game you will be asked if they 
want to play again. A Y or Yes response will start 
another game. AN or No will exit from the program. 


NOTE: A game paddle (158k ohm potentiometer) must be connected 
to PDL (@) of the Game I/0 connector for this game. 


COLOR DEMO TAPE 


PROGRAM DESCRIPTION 

COLOR DEMO demonstrates some of the Apple II video graphics 
capabilities. In it are ten examples: Lines, Cross, Weaving, 
Tunnel, Circle, Spiral, Tones, Spring, Hyperbola, and Color Bars. 
These examples produce various combinations of visual patterns 
in fifteen colors on a monitor or television screen. For example, 
Spiral combines colorgraphics with tones to produce some amusing 
patterns. Tones illustrates various sounds that you can produce 
with the two inch Apple speaker. These examples also demonstrate 
how the paddle inputs (PDL(X)) can be used to control the audio 
and visual displays. Ideas from this program can be incorporated 
into other programs with a little modification. 


REQUIREMENTS 

4K or greater Apple II system, color monitor or television, 
and paddles are needed to use this program. BASIC is the pro- 
gramming language used. 
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BREAKOUT GAME 
PROGRAM LISTING 


PROGPAM LISTING 


5 GOTO 15 
10 Q=( PDL (8)-20)/6: IF Q(@ THEN 
Q=0: IF @3=34 THEN Q=24: COLOR= 
Ds ¥LIN @,0+5 AT @: COLCR=2: 
IF FQ THEN 175: IF @ THEE 
VLIK @,0-1 AT @sP=Q: RETURH 


15 DIN ASC13),B8C185:A=1:B=13: 
=$:D-6:E=15: TERT : CALL - 
936: ¥IRB 4: TRE i: PRIKT 
"#43 BREARGUT 43%": PRINT 

cd PRIRT * = OBJECT iS TB BcSTROY 
ALL BRIGKS": PREHT : INPL: 
"HI, WHAT'S YOUR WARE? ° 83 


23 PRINT “STAHDARD COLORS ° 385 
3: EHPUT ° Y/N? *,B3: GR: CALL 
“936: LF BSL ,i)E°N" THER 48 
: FOR [=6 15 33: COLOR=1/2% 
(1432): ¥LIK 8,39 aT I 

36 HEXT Ts PORE 34,28: PRINT : 

PRIRT : PRINT : FOR I=# Tt 
igs ¥TAB 2i+! ROD é: TAB it 
I+1: PRINT a HEAT 1: PORE 
34,222 YIAB 24: PRINT 2 PRIRT 
ROU; 


39 GUSUB 9S: A=E: PRIHT "EVER BRICK® ° 


: GOSUB 95:8-E: PRINT "Gb> BRIC 
. : GOSUB 95:€=E: PRINT "PADDLE 
*s: GOSUB 93:B=E: PRINT "BALL? 

3 GOSUE 95 


40 POKE 34,28: COLOR=H: FOR i= 
6 1G 39: ¥LIR 8,39 AT I: HEAT 
I: FOR I=28 TO 34 STEP 2: TAB 
itt: PRINT 172-93: COLOR=e: 
VLIN 6,35 AT Ts COLOR=C: FOR 
J=] HOD 4 TO 39 STEP 4 


45 VLIW J,J41 AT I: NEXT J, 1: TAB 
S: PRINT "SCORE = 6": PRINT 
: PRINT : POKE 34,2i:5=0:F= 
GeL=S:Xei9: Y=19:L=6 
Sa COLOR=A: PLOT ¥,9/3:X=19:7= 
RND (1283:¥=-1:¥= PND (53+ 
PsLst-t: IF LCL THEN 128: TAB 
6: IF L31 THEN PRINT Ls” BALLS L 
EFT" 
55 IF L=i THER PRINT "LAST BALL, * 
sfi$: PRIHT : FOR I=i TO 186 
: GOSUB 18: NEXT [:HeL:Neé 
6@ J=¥e¥: IF 3520 AND J¢120 THEN 
65:We-WJ=¥: FOR I=] 10 6:K= 
PEEK (-16336): NEXT I 
65 I=Ke¥: IF 148 THEN 186: GOSUB 
178: COLOR=A:K=J/3: IF 1339 
THEN 75: IF SCRNCI,K}=A THEN 
85: IF I THEN i@@sNeNtl: ¥=( 
NPSL Welk -P jee-5: He! 
7@ Z= PEEK (-16336}- PEEK (16236 
}+ PEEK (-16336)- PEEK (-16336 
}+ PEEK (-16336)- PEEK (-16336 
}+ PEEK (-16336): GOTO 25 
75 FOR I=1 TO é:H= PEEK (-16336 
): NEXT I: T=R Hee 


88 V=-9 
So PLOT X;¥/3s COLOR=E: PLOT i, 
Krk=1:¥=J: GOT6 68 


96 PRINT "INVALID. REENTER"; 
95 INPUT * COLOR: (8 TO 15)°,£: 
IF EC8 OR E15 THEN 98: RETURN 
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100 IF M THEN V= ABS (¥): YLIN 
K/ee2,K/2a241 AT 1:5=541/2- 
9: VIAB 2l: TAB 13: PRINT S 

105 = PEEK (-16336)- PEEK (-16336 
j¢ PEEK (-16366)- PEEK (-16336 
}+ PEEK (-16396)- PEEK (-16336 
}t PEEK (-16336)- PEEK (-16336 
}e PEEK (=16336)- PEEK <-16336 


He IF 5¢728 THEN 36 
3 PRINT "CONGRATULATIONS, * Af 
* 700 VINE": SOTE 165 
idé PRINT "YOUR SCORE OF °35 
32 GOTE L25H 57180085 
i23 PRINT "TERRIBLE!*: S076 163 


38 1S a 


138 PRIRT "LOUSY. *: GOTO loo 
135 PRINT “POOR.*: GGTD ibs 
i4@ PRINT "FAIR. ": GOTO 155 
i45 PRINT "GO0D.": GOTG 163 
156 PRINT "VERY G00D.°: GOTO 165 
135 PRIRT "EXCELLENT. *: GOT@ 163 
168 PRINT "NEARLY PERFECT. © 
165 PRIKT "ANOTHER GARE "5A$;° (Y/N) 
“sr INPUT AS: LF REL Los*Y? 
THEN 25: TEAT : CALL -936: 
YTAB if: TAB if: PRINT “GARE OF 
ER": EXD 
76 G=¢ POL (8)-26)76: IF 8 THEN 
G=@: IF Q)=34 THEW G=34: COLOR= 
Ds ¥LIN @,0+5 AT 6: COLGR=A: 
IF P38 THEN i75: IF @ THEN 
YLIH 8,4-1 AT @:P=O: RETURE 


i73 iF P=Q THEN RETURK : iF 8334 
THER YLIN Q+6,39 AT @:P=i: 
RETURN 

186 FOR I=1 TG 8@:8= PEEK (-16336 
)}: HEXT I: S610 38 


COLOR DEMO PROGRAM 


PRCGRAM LISTING 
1@ DIK C(4)s POKE 2,173: PORE. 
3,40: POKE 4,192: POKE 5,165 
: POKE 6,8: PORE 7,3e: PORE 
$,16: POKE 9,252: POKE 18, 
1o5: POKE it,t; POKE iz.2a8 


26 POKE 13,4: POKE i4,i98: PORE 
15,24: PORE 15,248: FORE i? 
pot PORE 18,198: PORE 19,1: 
POKE 28,76: POKE ei,c: PORE 
c2,8: POKE 23,96 

36 TEXT : CALL -936: VIRE 4: TAB 
S: PRINT "4k COLOR DERGS*: PRINT 
: PRIMT "1 LINES": PRi8? “2 CROS 
5": PRINT °3 BEAYING® 

4@ PRINT "4 TUNNEL": PRINT "3 CERCL 
E*s PRINT “6 SPIRAL ##*: PRINT 
"7 TONES #¢ ": PRINT *8 SPRING® 


SQ PRINT "9 HYPERBOLA": PRINT 
"16 COLOR BARS': PRINT : PRINT 
"s+ HEEOS PDL(@) CONNECTED* 
: PRIKI 

64 PRINT "HIT ANY KEY FOR BEY DEMO” 
:2=0: PRINT : INPUT "WHICH DENG 
$ "415 GR: IF 16 AND Gu 
THEN GOTO i8G#1: GOTG 38 

70 INPUT "WHICH DEO WOULG YOU LIKE 
"I: GR: IF 1 AND 128 THEN 
GOTO 18@e1: GOTO 38 

100 1=141 MOD 79: J=14¢ 1539986 79 
-[-]): GOSUB 260: GOSUE 12008 
: GOTO 188 

OG8 I=1+1 MOD 39:J=I: GOSUB 2060 
:J=39-1: GOSUB 28Gu: GOSUB 
(e008: GOTO 268 


LISTING 


362 JaJ+t:J=1 AOD ctl: FOR I=! 
TH 1295: COLOR=2 ABD J4?: PLAT 
(ee]3 HOD 37,4581) AGE 35s RERT 
i: GG5UB RAGE 
490 FOR I=1 | 
; HEXT i 
418 FOR [=3 12 i STkP - 
=(i 13: HES? isl! 
ys FOR [=i 10 3: FOR i=i 18 
4 
4e8 COLGR=E Pe caishe dt ike s- 
i: HLIM RL AT Ks YLEK KL AT 
L: HLIN Ki AP Ls ¥iLER RL i 
Ks HEAT 3,1: 505uB isedé: 
41¢ 
88 2=28: G00 S88 
688 COLOR= RMD 16): FOR I= Te 
18 STEP 2sJ=39-Ts -HLIR 1,2 AT 
I: G85U8 ad@: YLIN LJ AT os 
GISUB 648 
618 HLIK i42,2 AT J: SOSUB 648: 
WLit [+e,3 AT itd: oG5ub 646 
: NEAT I 
bed CULGR= KAD (163: FOR i=i8 10 
6 STEP -é:J=39-i: YLik ite, 
J AT ite: - GOSUE od#: HLIN I+ 
2,d AT J: GGSUE 648 
638 ¥LIK 1,2 A? J: GOSUB 646: HLIN 
1,3 AT f: GOSUB 646: RERT I: 
HOSUR iGeBG: GOTO 688 
648 K=LtfsL=KakeSekec6+7e:L=se76/ 
‘Lat POL (B3718): POKE 8K: 
POKE {,L RGD 206: PORE 24, 
Léz56tl: CALL 2: RETURN 


Pa 4:1 }= PHD fig} 


fe] 41} 


iE ERD f (it 
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768 i= RAD (38)4+3: J=lele5+lezot 
POrK=3e767/34¢ PBL C@)A10): 
POEE G1: PORE 1,E HOG 256 
> POKE 24,€R3255 341: CALL 2 
© G05U8 i885: SiTO 7a 

S66 k=g:8=1e68:P=A:i=28se=4: 7=8 
ssi: CHLOR=6: HLIN @,39 AT 
4: COLUE=9: GDSUE d2f: COLOR= 
2s YLIN S,N-2 aT 

cig N=2sA-P-f/@: HLS bOSue 
Ged: LIN 3,29 AE asz=Eti: TF 
RCS? THER Be8:h=3: ¥LIE 5,99 
AT i: ¥L18 5,39 AT 2 

eed P=AA=H: 728 18e: COLORSIes OSUB 
_ 5-2 al 

- eth FOR 

G5UB 18888 


. Par a rm 3 
fie LULUESi 


: bUTD 812 

O96 A=L-Y:LisH-isLe=Hei: ¥LUH Li, 
Le AT X-i: ¥YLIN LE,L2 BY a: 
WIR iL,L2 AT k+l: RETURN 


966 1141 ROD £5: FOR 7=8 TE 
: POR A=6 TO 39: COLOR=is{ ABS 
Ce5-X)-2 08 ABS 28-7 2 25 
: PLOT X,Y: NEZT §.7: GO5UB 
1808: GOTG 988 
1888 TALL -936 
igi6 J=1+] MOD 32: COLOR=J/i: ¥LIH 
6,29 AT 3+3: YTB 2ie( 1/2) BOD 
e: TAB a iF J GD @ THER 
PRINT J/23: GQSUB 19898: 6072 
1816 
C666 COLOR= RHD (ia): HLIW 8,39 AT 
J: COLGR= BND C16): ¥LIH @, 
33 AT J: RETURN 
iw@ee IF PEEK (-16384)128 THEN RETURR 
: POKE -i6268,8: PRP : GOTO 
38 


m~ememoenmeomeowmewmowmen em APPLE Il STARTREK VERSION ~enmeomeomeowmeonmeonm eM eowmonme™ 


THIS IS A SHORT DESCRIPTION OF HOW TO FLAY STARTREK ON THE 
APPLE COMPUTER. 


THE UNIVERSE IS MADE UF OF 64 QUADIIRANTS IN AN 8 BY 8 MATRIX. 
THE QUADRANT IN WHICH YOU °THE ENTERFRISE * AREs IS IN WHITE? 
AND A BLOW UP OF THAT QUALIRANT IS FOUND IN THE LOWER LEFT 
CORNER. YOUR SFACE SHIF STATUS IS FOUND IN A TABLE TO 

THE RIGHT SIDE OF THE QUADRANT BLOW UF. 

THIS IS A SEAKCH ANDI? DESTROY MISSION. THE OBJECT 1S TO LONG-RANGE 
SENSE FOR INFORMATION AS TO WHERE KLINGONS (K) AREs MOVE TO THAT QUADRANT» 
ANDI DESTROY. 

NUMBERS DISPLAYED FOR EACH QUALRANT DENOTE? 
# OF STARS IN THE ONES FLACE 

# OF BASES IN THE TENS FLACE 

# OF KLINGONS IN THE HUNDREDS FLACE 
AT ANY TIME TURING THE GAMEr FOR INSTANCE KEFORE ONE TOTALLY 
RUNS OUT OF ENERGYs OR NEEDS TO REGENERATE ALL SYSTEMS+ ONE MOVES TO A 
QUADRANT WHICH INCLUDES A FASE» IONS NEXT TO THAT HASE (BRB) AT WHICH TIME 
THE BASE SELF-DESTRUCTS ANI THE ENTERPRISE (E) HAS ALL SYSTEMS °GO° 
AGAIN. 


‘ 


TO FLAY: 
1. THE COMMANDS CAN BE OBTAINED BY TYFING A °O° (ZERO) ANI RETURN. 
THEY ARE: 


1. FROPULSION 2. REGENERATE 

3. LONG RANGE SENSORS 4. FHASERS 

S- FHOTON TORFEDOES 6. GALAXY RECORDED 
7. COMPUTER 8. FROBRE 

9. SHIELD ENERGY 10.LAMAGE REFORT 


11.LOAD PHOTON TORPEDOES 
2. THE COMANI?S ARE INVONRED BY TYFING THE NUMBER REFERING TO THEM 

FOLLOWED RY A “RETURN®. . 

A. IF RESFONSE IS 1 THE COMPUTER WILL ASK WARF OR ION ANI 
EXFECTS °W° IF ONE WANTS TO TRAVEL IN THE GALAXY 
BETWEEN QUALIRANTS ANT AN °1° LF ONE WANTS ONLY 
INTERNAL QUAIIRANT TRAVEL. 
DURATION OF WARF FACTURK IS THE NUMBER OF SFACES OK 
QUALIRANTS THE ENTERPRISE WILL MOVE. 
COQURSE IS COMPASS READING IN DEGREES FOR THE DBESI- 
RED TP&STINATION. 

Kk. A 2 REGENERATES THE ENERGY AT THE EXFENSE OF TIME. 

-C. A 3 GIVES THE CONTENTS OF THE IMMEDIATE ADJACENT QUADRANTS. 
THE GALAXY IS WRKAF-AROUNL IN ALL [FIRECTIONS. 

Tr. 4 FIRES FHASERS AT THE EXPENSE OF AVAILABLE ENERGY. 


E. S INITIATES A SET OF QUESTIONS FOR TORPEDO FIRING. 
THEY CAN BE FIRED AUTOMATICALLY IF THEY HAVE 
BEEN LOCKED ON TARGET WHILE IN THE COMPUTER 
MODE+ OR MAY BE FIRED MANUALLY IF THE TRAGECTORY ANGLE 
IS KNOWN. 
F. 6» 8 ANI 10 ALL GIVE INFORMATION ABOUT THE STATUS OF THE SHIP 
AND ITS ENVIRONMENT. 
G. 9 SETS THE SHIELDI) ENERGY/AVAILABLE ENERGY RATIO. 
H. 11 ASKS FOR INFORMATION ON LOADING AND UNLOADING OF 
PHOTON TORPEDOES AT THE ESPENSE OF AVAILABLE ENERGY. 
THE ANSWER SHOULI! BE A SIGNED NUMBER. FOR EXAMPLE 


#5 OR -2 e 
I. 7 ENTERS A COMPUTER WHICH WILL RESFOND TO THE FOLLOWING 
INSTRUCTIONS: 
1. COMPUTE COURSE 2e LOCK FPHASERS 
3. LOCK FHOTON TORPEDOES 
4. LOCK COURSE S-« COMPUTE TREJECTORY 
6. STATUS 7e RETURN TO COMANT MOLE 


IN THE FIRST FIVE ONE WILL HAVE TO GIVE COORDINATES. 
COORININATES ARE GIVEN IN MATHMATICAL NOTATION WITH 
THE EXCEPTION THAT THE °Y° VALUE IS GIVEN FIRST. 

AN EXAMPLE WOULD BE °Y»rX° 


COURSE OR TRAJECTORY: 


270------------- 


@ comp «Ge «ae (ap t cep amp ap (aD fo) 
! 
! 
' 
! 
! 
' 
1 
' 
! 
! 
1 
! 
Oo 
oO 


~~ 
o 


~emomomeomewmeonmeo™ THIS EXPLANATION Was WRITTEN BY ELLWOOD —enmeowmenm eon eo mem enm em 
NOT RKESPONSIBLE FOR 
ERRORS 
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LOADING THE HI-RES DEMO TAPE 


PROCEDURE 


1. Power up system - turn the AC power switch in the back 
of the Apple II on. You should see a random matrix of 
question marks and other text characters. If you don't, 
consult the operator's manual for system checkout pro- 
cedures. 


2. Hit the RESET key. On the left hand side of the screen 
you should see an asterisk and a flashing cursor next to 
it below the text matrix. 


3. Insert the HI-RES demo tape into the cassette and rewind 
it. Check Volume (59-79%) and Tone (89-199%) settings. 


4, Type in "CQ9.FFFR" on the Apple II keyboard. This is the 
address range of the high resolution machine language sub- 
program. It extends from $C@9 to $FFF. The R tells the 
computer to read in the data. Do not depress the "RETURN" 
key yet. 


5. Start the tape recorder in playback mode and depress the 
"RETURN" key. The flashing cursor disappears. 


6. A beep will sound after the program has been read in. 
STOP the tape recorder. Do not rewind the program tape yet. 


7. Hold down the "CTRL" key, depress and release the B key, 
then depress the "RETURN" key and release the "CTRL" key. 
You should see a right facing arrow and a flashing cursor. 
The B© command places the Apple into BASIC initializing 
the memory pointers. 


8. Type in "LOAD", restart the tape recorder in playback mode 
and hit the "RETURN" key. The flashing cursor disappears. 
This begins the loading of the BASIC subprogram of the 
HI-RES demo tape. 


9. A beep will sound to indicate the program is being loaded. 
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10. A second beep will sound, and the right facing arrow 
will reappear with the flashing cursor. STOP the 
tape recorder. Rewind the tape. 


11. Type in "HIMEM:8192" and hit the "RETURN" key. This 
sets up memory for high resolution graphics. 


12. Type in "RUN" and hit the "RETURN" key. The screen 


should clear and momentarily a HI-RES demo menu table 
should appear. The loading sequence is now completed. 


SUMMARY OF HI-RES DEMO TAPE LOADING 


mand 
e 


RESET 
Type in CQM.FFFR 
Start tape recorder, hit RETURN 


>_> WJ RP 


Asterick or flashing cursor reappear 
BS (CTRL B) into BASIC 


5. Type in "LOAD", hit RETURN 

6. BASIC prompt (7) and flashing cursor 
reappear. Type in “HIMEN:8192", hit 
RETURN 

7. Type in "RUN", hit RETURN 


8. STOP tape recorder, rewind tape. 
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APPLE II INTEGER BASIC 


—h otk 
G N 


oak = ah 
=OOANOA NBR WD = 


. BASIC Commands 

. BASIC Operators 

. BASIC Functions 

. BASIC Statements 

. Special Control and Editing 

. Table A — Graphics Colors 

. Special Controls and Features 


BASIC Error Messages 


. Simplified Memory Map 

. Data Read/Save Subroutines 

. Simple Tone Subroutines 

. High Resolution Graphics 

. Additional BASIC Program Examples 


BASIC COMMANDS 


Commands are executed immediately; they do not require line nuimbers.Most Statements 
(see Basic Statements Section) may also be used as commands. Remember to press 
Return key after each command so that Apple knows that you have finished that 

line. Multiple commands (as opposed to statements) on same line separated by 

a" : " are NOT allowed. 


COMMAND NAME: 


AUTO num Sets automatic line numbering mode. Starts at line 
number nmwn and increments line numbers by 10. To 
exit AUTO mode, type a control X*, then type the 
letters "MAN" and press the return key. 


AUTO num1, num2 Same as above execpt increments line numbers by 
number nwn2. 

CLR Clears current BASIC variables; undimensions arrays. 
Program is unchanged. 

CON Continues program execution after a stop from a 
control C*. Does not change variables. 

DEL muni Deletes line number wri. 

DEL num1, num2 Deletes program from line number wn through line 


number numé2. 


DSP var Sets debug mode that will display variable var every- 

_ time that it is changed along with the line number 
that caused the change. (NOTE: RUN command clears 
DSP mode so that DSP command is effective only if 
program is continued by a CON or GOTO command.) 


HIMEM: expr Sets highest memory location for use by BASIC at 
location specified by expression exmin decimal. 
HIMEM: may not be increased without destroying program. 
HIMEM: is automatically set at maximum RAM memory when 
BASIC is entered by a control] B*. 


GOTO expr Causes immediate jump to line number specified by 
expression expr. 


GR Sets mixed color graphics display mode. Clears screen 
to black. Resets scrolling window. Displays 40x4@ 
squares in 15 colors on top of screen and 4 lines of text 


at bottom. 

LIST Lists entire program on screen. 

LIST nwni Lists program line number nwn1. 

LIST nwml, num Lists program line number nwnz through line number 
numé . 
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LOAD expr. 


LOMEM: expr 


MAN 


NEW 
NO_DSP var 
NO TRACE 
RUN 


RUN expr 


SAVE 


TEXT 


TRACE 


Reads (Loads) a BASIC program from cassette tape. 

Start tape recorder before hitting return key. Two 
beeps and a ">" indicate a good load. "ERR" or "MEM" 
FULL ERR" message indicates a bad tape or poor recorder 
performance. 


Similar to HIMEM: except sets lowest memory location 
available to BASIC. Automatically set at 2948 when 
BASIC is entered with a control B*. Moving LOMEM: 
destroys current variable values. 


Clears AUTO line numbering mode to all manual line 
numbering after a control C* or control X*. 


Clears (Scratches) current BASIC program. 
Clears DSP mode for variable var. 
Clears TRACE mode. 


Clears variables to zero, undimensions all arrays and 
executes program starting at lowest statement line 
number. 


Clears variables and executes program starting at line 
number specified by expression expr. 


Stores (saves) a BASIC program on a cassette tape. 
Start tape recorder in record mode prior to hitting 
return key. 


Sets all text mode. Screen is formated to display 
alpha-numeric characters on 24 lines of 4 characters 
each. TEXT resets scrolling window to maximum. 


Sets debug mode that displays line number of each 
statement as it is executed. 


Control characters such as control X or control C are 
typed by holding down the CTRL key while typing the 
specified letter. This is similiar to how one holds 

down the shift key to type capital letters. Control 
characters are NOT displayed on the screen but are 
accepted by the computer. For example, type several 
control G's. We will also use a superscript C to indicate 
a control character as in X°. 
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BASIC Operators 


symbol Sample Statement Explanation 
Prefix Operators 
( ) 19 X= 4*(5 + X) Expressions within parenthesis ( ) 
are always evaluated first. 
+ 29 X= 14+4*5 Optional; +] times following expression. 
- 39 ALPHA = Negation of following expression. 
-(BETA +2) 
NOT 46 IF A NOT B THEN Logical Negation of following expression; 
2090 9 if expression is true (non-zero), 


if expression is false (zero). 


Arithmetic Operators 
3 


4 66 Y = X+3 Exponentiate as in X°. NOTE: + is 
shifted letter N. 


* 70 LET DOTS=A*B*N2 Multiplication. NOTE: Implied multi- 
plication such as (2 + 3)(4) is not 
allowed thus N2 in example is a variable 


not N * 2. 
/ 80 PRINT GAMMA/S Divide. 
MOD 90 X = 12 MOD 7 Modulo: Remainder after division of 
199 X = X MOD(Y+2) first expression by second expression. 
+ 119 P=L+G Add 
- 120 XY4 = H-D Substract 
= 13@ HEIGHT=15 Assignment operator; assigns a value to 
149 LET SIZE=7*5 a variable. LET is optional 
150 A(8) = 2 


155 ALPHA$ = "PLEASE" 
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Relational and Logical Operators 


The numeric values used in logical evaluation are "true" if non-zero, 
"false" if zero. 


symbol sample Statement Explanation . 

= 169 IF De=eE Expression "equals" expression. 
THEN 500 

= 179 ~=2OIF = A$(1,1)= String variable "equals' string variable. 
"Y" THEN 599 

# or < > 180 IF ALPHA #X*Y Expression "does not equal" expression. 

THEN 599 

# 199 IF A$ # "NO" String variable "does not equal" string 
THEN 509 variable. NOTE: If strings are not 

the same length, they are considered 
un-equal. < > not allowed with strings. 

> 2009 +$XIF A>B Expression "is greater than" expression. 
THEN GO TO 59 

< 210 4XIF A+1<B-5 Expression "is less than" expression. 
THEN 190 

>= 220 IF A>=B Expression "is greater than or equal to" 
THEN 109 expression. 

<= 230 IF A+1<=B-6 Expression "is less than or equal to" 
THEN 200 expression. 

AND 249 IF  A>B AND Expression | "and" expression 2 must 
C<D THEN 200 both be "true" for statements to be true. 
OR 250 IF ALPHA OR If either expression 1 or expression 2 

BETA+] THEN 200 is "true", statement is "true". 
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BASIC FUNCTIONS 


Functions return a numeric result. 


of expressions. 


They may be used as expressions or as part 
PRINT is used for examples only, other statements may 


be used. Expressions following function name must be enclosed between two 


parenthesis signs. 


FUNCTION NAME 
ABS (expr) 
ASC (str$) 


LEN (str$) 


Pp_ (expr) 


PEEK (expr) 


RND (expr) 


SCRN(expr1, 
expr2) 


SGN (expr). 


399 PRINT ABS(X) 


310 PRINT ASC("BACK") 


326 PRINT ASC(B$) 


330 PRINT ASC(B$(4,4)) 


335 PRINT ASC(B$(Y)) 


340 PRINT LEN(B$) 


359 PRINT PDL(X) 


360 PRINT PEEK(X) 


370 PRINT RND(X) 


380 PRINT SCRN (X1,Y1) 


390 PRINT SGN(X) 
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Gives absolute value of the expression expr. 


Gives decimal ASCII value of designated 
String variable str$. If more than one 
character is in designated string or 
sub-string, it gives decimal ASCII 

value of first character. 


Gives current length of designated 
string variable str$;i.e., number of 
characters. 


Gives number between @ and 255 corres- 
ponding to paddle position on game paddle 
number designated by expression expr and must 
be legal paddle (§,1,2,or 3) or else 255 is 
returned. 


Gives the decimal value of number stored 
of decimal memory location specified by 

expression expr. For MEMORY locations 

above 32676, use negative number; 7.e., 

HEX location FFF@ is -16 


Gives random number between QJ and 
(expression expr -1) if expression expr 
is positive; if minus, it gives random 
number between @ and (expression expr +1). 


Gives color (number between @ and 15) of 
screen at horizontal location designated 

by expression expr1 and vertical 

location designated by expression expr2 

Range of expression expr7 is @ to 39. Range 

of expression expr2 is # to.39 if in standard 
mixed colorgraphics display mode as set by 

GR command or — to 47 if in all color mode 

set by POKE -16304 ,O: POKE - 16302,9. 


Gives sian (not sine) of expression expr 
i.e., -1 if expressionexpr is negative, zero 1 
zero and +1 ifexpr is positive. 


BASIC STATEMENTS 


Each BASIC statement must have a line number between @ and 32767. Variable 

names must start with an alpha character and may be any number of alpha- 

numeric characters up to 192. Variable names may not contain buried any 

of the following words: AND, AT, MOD, OR, STEP, or THEN. Variable names may 

not begin with the letters END, LET, or REM. String variables names must end 

with a $ (dollar sign). Multiple statements may appear under the same line number 
if separated by a : (colon) as long as the total number of characters in the line 
(including spaces) is less than approximately 15@ characters 

Most statements may also be used as commands. BASIC statements are executed 

by RUN or GOTO commands. 


NAME 


CALL expr 19 CALL-936 Causes execution of a machine level 
language subroutine at decimal memory 
location specified by expression expr 
Locations above 32767 are specified using 
negative numbers; i.e., location in 
example 10 is hexidecimal number $FC53 


COLOR=expr 30 COLOR=12 In standard resolution color (GR) 

— graphics mode, this command sets screen 
TV color to value in expression expr 
in the range @ to 15 as described in 
Table A. Actually expressionexpr may be 
in the range @ to 255 without error message 
Since it is implemented as if it were 
expressionexpr MOD 16. 


DIM varl (expr1) 50 DIM A(2Q),B(19) The DIM statement causes APPLE II to 


str$ (expr2) 69 DIM B$(3Q) reserve memory for the specified variables. 
var2 (expr3) 70 DIM C (2) For number arrays APPLE reserves 
Illeqal: approximately 2 times exprbytes of memory 
89 DIM A(3) limited by available memory. For string 
Leqal: arrays -str$- (expr) must be in the range of 
85 DIM C(1999) 1 to 255. Last defined variable may be 


redimensioned at any time; thus, example 
in line is illegal but 85 is allowed. 


DSP var Leqal: Sets debug mode that DSP variable var each 
90 DSP AX: DSP L time it changes and the line number where the 
Illeqal: change occured. 
19 DSP AX,B 
192 DSP ABS 
164 DSP A(5) 
Legal: 
195 A=A(5): DSP A 
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NAME 
END 


FOR var= 


21 Werpr2 
StEPoaprs 


GOSUD expr 


GOTO expr 


HLIN expr1, 
“expreAtexpr3 


Note: 


EXAMPLE DESCRIPTION 


119 END Stops program execution. Sends carriage 
return and ">" BASIC prompt) to screen. 

119 FOR L=9 to 39 Begins FOR...NEXT loop, initializes 

120 FOR X=Y1 TO Y3 variable var to value of expression expri 

139 FOR I=39 TO 1 then increments it by amount in expression 

159 GOSUB 120 *J2 expr 3each time the corresponding "NEXT" 


Statement is encountered, until value of 
expression expr 2is reached. If STEP expr3 

is omitted, a STEP of +1 is assumed. Negative 
numbers are allowed. 


149 GOSUB 599 Causes branch to BASIC subroutine starting 
at legal Tine number specified by expression 
expr Subroutines may be nested up to 


16 levels. 
169 GOTO 209 Causes immediate jump to legal line 
176 GOTO ALPHA+160 number specified by expression expr. 


189 GR 

199 GR: POKE -16392,0 Sets mixed standard resolution color 
graphics mode. Initializes COLOR = 9 
(Black) for top 49x49 of screen and sets 
scrolling window to lines 21 through 24 
by 49 characters for four lines of text 
at bottom of screen. Example 199 sets 
all color mode (40x48 field) with no text 
at bottom of screen. 


200 HLIN 9,39 AT 2D In standard resolution color graphics mode 

219 HLIN Z,Z+6 AT I this command draws a horizontal line of a 
predefined color (set by COLOR=) starting 
at horizontal position defined by expression 
expr1 and ending at position expre at 
vertical position defined by expression 
expr3 .expr1 andexpr2 must be in the range 
of p to 39 and expr1] < =expr2 . expr3 


be in the range of @ to 39 (or @ to aT if not 
in mixed mode). 


LIN @, 19 AT @ is a horizontal line at the top of the screen 


extending from left corner to center of screen and HLIN 29,39 AT 
39 is a horizontal line at the bottom of the screen extending from 
center to right corner. 
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IF expresston 229 IF A>B THEN 
THEN statement PRINT A 


INPUT varl, 
vare, strs 


INE expr 


LET 
LIST nwni, 


num2 


NEXT vari, 
Vvar2 


NO DSP var 
NO TRACE 


239 IF X=@ THEN C=1 
249 IF A#19 THEN 


GOSUB 200 
250 IF A$(1,1)# "Y" 
THEN 199 
Illegal: 
269 IF L>5 THEN 59: 
ELSE 69 
Legal: 
279 IF L>5 THEN 59 
GO TO 69 
280 INPUT X,Y,Z(3) 
290 INPUT "AMT", 
DLLR 
309 INPUT "Y or N?", A$ 
310 IN# 6 
320 IN# Y+2 
330 IN# 0 
349 LET X=5 
od 
359 IF X>6 THEN 
LIST 59 
360 NEXT I 


379 NEXT J,K 


389 NO DSP I 
399 NO TRACE 
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If expression is true (non-zero) then 
execute statement, if false do not 
execute statement, If statement 

is an expression, then a GOTO expr 

type of statement is assumed to be implied. 
The "ELSE" in example 269 is illegal but 
may be implemented as shown in example 279. 


Enters data into memory from I/0. 
device. If number input is expected, 
APPLE wil output "?"; if string input is 


expected no "?" will be outputed. Multiple 


numeric inputs to same statement may be 
separated by a comma or a carriage return. 
String inputs must be separated by a 
carriage return only. One pair of " " may 
be used immediately after INPUT to output 
prompting text enclosed within the quotation 
marks to the screen. 


Transfers source of data for subsequent 
INPUT statements to peripheral I/0 slot 
(1-7) as specified as by expression expr. 
Slot § is not addressable from BASIC. 
IN#@ (Example 339) is used to return data 
source from peripherial I/0 to keyboard 
connector. 


Assignment operator. "LET" is optional 
Causes program from line number nwmn1 
through line number nwn2 to be displayed 
on screen. 

Increments corresponding "FOR" variable 


and loops back to statement following 
"FOR" until variable exceeds limit. 


Turns-off DSP debug mode for variable 


Turns-off TRACE debug mode 


PLOT | exprl, expr2 499 PLOT 15, 25 In standard resolution color 

499 PLT XV,YV graphics, this command plots a small 
square of a predefined color (set 
by COLOR=) at horizontal location 
Specified by expression expri1 in 
range @ to 39 and vertical location 
specified by expressionexpr2 in range 
9 to 39 (or @ to 47 if in all graphics 
mode) NOTE: PLOT 9 9 is upper left 
and PLOT 39, 39 (or PLOT 39, 47) is 
lower right corner. 


POKE expr1, expr? 4290 POKE 29, 49 Stores decimal number defined by 
430 POKE 7*256, expression expr2 in range of @ 
XMOD255 255 at decimal memory location 


specified by expression expr1 
Locations above 32767 are specified 
by negative numbers. 


POP 449 POP "POPS" nested GOSUB return stack 
address by one. 


PRINT vari, var, str$ 459 PRINT Ll Outputs data specified by variable 
460 PRINT L1, X2 var or string variable strS$ starting 
470 PRINT "AMT="3DX at current cursor location. If there 
489 PRINT A$;B$; is not trailing "," or ";" (Ex 459) 
499 PRINT a carriage return will be generated. 


hon RINT a Commas (Ex. 469) outputs data in 5 
left justified columns. Semi-colon 
(Ex. 478) inhibits print of any spaces. 
Text imbedded in" " will be printed 
and may appear multiple times. 


PRE expr 500 PR# 7 Like IN#, transfers output to I/0 
slot defined by expression expr 
9 is video output not I/0 slot @. 


REM 510 REM REMARK No action. All characters after REM 
are treated as a remark until terminated 
by a carriage return. 


RETURN 529 RETURN Causes branch to statement following 
530 IFX= 5 THEN last GOSUB; i.e., RETURN ends a 
RETURN subroutine. Do not confuse "RETURN" 


statement with Return key on keyboard. 
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TAB expr 


TEXT 


TRACE 


VLIN expri1, expr2 
AT expr3 


VTAB expr 


530 TAB 24 

549 TAB I+24 

550 IF A#B THEN 
TAB 29 


559 TEXT 
560 TEXT: CALL-936 


579 TRACE 
580 IFN > 32900 
THEN TRACE 


599 VLIN 9, 39ATI5 
699 VLIN Z,Z+6ATY 


619 VTAB 18 
629 VTAB Z+2 
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Moves cursor to absolute horizontal 
position specified by expression 

expr in the range of 1 to 49. Position 
is left to right 


Sets all text mode. Resets 

scrolling window to 24 lines by 49 
Characters. Example 569 also clears 
screen and homes cursor to upper left 
corner 


Sets debug mode that displays each 
line number as it is executed. 


Similar to HLIN except draws vertical 
line starting at expri and ending at 
expr2 at horizontal position expr3. 


Similar to TAB. Moves cursor to 
absolute vertical position specified 
by expressionexpr in the range 1 to 
24. VTAB 1 is top line on screen; 
VTAB24 is bottom. 


SPECIAL CONTROL AND EDITING CHARACTERS 


"Control" characters are indicated by a super-scripted "C" such as Gc, They 
are obtained by holding down the CTRL key while typing the specified letter. 
Control characters are NOT displaved on the TV screen. B~ and C~ must be 
followed by a carriage return. Screen editing characters are indicated by a 
sub-scripted "E" such as Dr. They are obtained by pressing and releasing the 
ESC key then typing specified letter. Edit characters send information only 
to display screen and does not send data to memory. For example, UC moves to 
cursor to right and copies text while Ag moves cursor to right but does not 
copy text. 


CHARACTER DESCRIPTION OF ACTION 


RESET key Immediately interrupts any program execution and resets 
computer. Also sets all text mode with scrolling window 
at maximum. Control is transfered to System Monitor and 
Apple prompts with a "*" (asterisk) and a bell. Hitting 
RESET key does NOT destroy existing BASIC or machine 
language program. 


Control B If in System Monitor (as indicated by a "*"), a control 


HIMEM: to maximum installed user memory and LOMEM: 
to 2048. 


Control C If in BASIC, halts program and displays line number 
where stop occurred*. Program may becontinued with a 
CON command. If in System Monitor, (as indicated by "*"), 
control C and a carraige return will enter BASIC without 
killing current program. 


Control G Sounds bell (beeps speaker) 

Control H Backspaces cursor and deletes any overwritten characters 
from computer but not from screen. Apply supplied 
keyboards have special key "<" on right side of keyboard 
that provides this functions without using control button. 

Control J Issues line feed only 

Control V Compliment to Ho. Forward spaces cursor and copies over 
written characters. Apple keyboards have ">" key on 
right side which also performs this function. 

Control X Immediately deletes current line. 


* If BASIC program is expecting keyboard input, you will have 
to hit carriage return key after typing control C. 
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CHARACTER DESCRIPTION OF ACTION 


Ae Move cursor to right 

Be Move cursor to left 

Ce Move cursor down 

De Move cursor up 

E. Clear text from cursor to end of line 

Fe Clear text from cursor to end of page 

@. Home cursor to top of page, clear text to end 


of page. 


Table A: APPLE II COLORS AS SET BY COLOR = 


Note: Colors may vary depending on TV tint (hue) setting and may also 
be changed by adjusting trimmer capacitor C3 on APPLE II P.C. Board. 
0 = Black 8 = Brown 
1 - Magenta 9 = Orange 
2 = Dark Blue 19 = Grey 
3 = Light Purple 11 = Pink 
4 = Dark Green 12 = Green 
5 = Grey 13 = Yellow 
6 = Medium Blue 14 = Blue/Green 
7 = Light Blue 15 = White 
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Special Controls and Features 


Hex 


BASIC Example 


Display Mode Controls 


C950 
CQ51 
C952 
CQ53 
C954 


CQ55 
C956 
CQ57 


POKE 
POKE 
POKE 
POKE 
POKE 


POKE 
POKE 
POKE 


TEXT Mode Controls 
99 POKE 32,LI 


9929 


9921 


P22 


9923 


9924 


9925 


9932 


FC58 
FC42 


- 16394 9 
-16393 9 
- 16392 ,p 
- 16391 ,9 
- 16399 D 


-16299,9 
~16298 9 
-16297 9 


199 POKE 33,W1 


119 POKE 34,T1 


129 POKE 35,B] 


139 CH=PEEK(36) 
149 POKE 36,CH 
159 TAB(CH+1) 


169 CV=PEEK(37) 
179 POKE 37,CV. 
189 VTAB(CV+1) 


198 POKE 
209 POKE 


219 CALL 
229 CALL 


5D, 127 
50,255 


-936 
-958 


Description 


Set color graphics mode 

Set text mode 

Clear mixed graphics 

Set mixed graphics (4 lines text) 

Clear display Page 2 (BASIC commands 
use Page 1 only) 

Set display to Page 2 (alternate) 

Clear HIRES graphics mode 

Set HIRES graphics mode 


Set left side of scrolling window 
to location specified by L1] in 
range of @ to 39. 


Set window width to amount specified 
by Wl. LI+W1<49. WI1>9@ 


Set window top to line specified 
by Tl in range of @ to 23 


Set window bottom to line specified 
by Bl in the range of @ to 23. BI>TI 


Read/set cusor horizontal position 

in the range of @ to 39. If using 

TAB, you must add "1" to cusor position 
read value; Ex. 140 and 150 perform 
identical function. 


Similar to above. Read/set cusor 
vertical position in the range 9 to 
23. 

Set inverse flag if 127 (Ex. 199) 
Set normal flag if 255(Ex. 299) 
(@¢) Home cusor, clear screen 


(Fe) Clear from cusor to end of page 


Hex BASIC Example 
FC9C 23 CALL -868 
FC66 249 CALL -922 
FC79 258 CALL -912 
Miscellaneous 
C930 360 X=PEEK(-16336) 
365 POKE -16336,9 
CHOD 379 X=PEEK(-16384 ) 
CH1p 389 POKE -16368,9 
Cp61 399 X=PEEK( 16287) 
CH62 499 X=PEEK(-16286) 
C963 419 X=PEEK(-16285 ) 
CO58 429 POKE -16296,9 
* CP59 439 POKE -16295.9 
CO5A 449 POKE -16294,9 
CO5B 459 POKE -16293.9 
CP5C 469 POKE -16292,9 
C#5D 479 POKE -16291,9 
CO5E 489 POKE -16290,9 
COSF 499 POKE -16289,9 


Description 


(Er) Clear from cusor to end of line 
(a) Line feed 


Scroll up text one line 


Toggle speaker 
Read keyboard; if X>127 then key was 
pressed. 


Clear keyboard strobe - always after 
reading keyboard. 


Read PDL(@) push button switch. If 
X>127 then switch is "on". 


Read PDL(1) push button switch. 
Read PDL(2) push button switch. 
Clear Game I/0 AN® output 

Set Game I/0 AN® output 

Clear Game I/0 ANI output 

Set Game I/0 AN] output 

Clear Game I/0 AN2 output 

Set Game I/0 AN2 output 

Clear Game I/0 AN3 output 

Set Game I/0 AN3 output 
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APPLE II BASIC ERROR MESSAGES 


*** SYNTAX ERR Results from a syntactic or typing error. 


**k > 32767 ERR A value entered or calculated was less than 
-32/767 or greater than 32/67. 


*kk > 255 ERR A value restricted to the range @ to 255 was 
outside that range. 


**%* BAD BRANCH ERR Results from an attempt to branch to a non- 
existant line number. | 


*** BAD RETURN ERR Results from an attempt to execute more RETURNs 
than previously executed GOSUBs. 


*** BAD NEXT ERR Results from an attempt to execute a NEXT state- 
ment for which there was not a corresponding 
FOR statement. 


*** 16 GOSUBS ERR Results from more than 16 nested GOSUBs. 

***k 16 FORS ERR Results from more than 16 nested FOR loops. 
***k NO END ERR The last statement executed was not an END. 
*** MEM FULL ERR The memory needed for the program has exceeded 


the memory size allotted. 


**k TOO LONG ERR Results from more than 12 nested parentheses or 
more than 128 characters in input line. 


*** DIM ERR Results from an attempt to DIMension a string 
array which has been previously dimensioned. 


**k*k RANGE ERR An array was larger than the DIMensioned 
value or smaller than 1 or HLIN,VLIN, 
PLOT, TAB, or VTAB arguments are out of 
range. 

***k STR OVFL ERR The number of characters assigned to a string 


exceeded the DIMensioned value for that string. 


*** STRING ERR Results from an attempt to execute an illegal 
string operation. 


RETYPE LINE Results from illegal data being typed in response 


to an INPUT statement. This message also requests 
that the illegal item be retyped. 
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Simplified Memory Map 


Monitor and BASIC Routines in ROM 


EQQQ | --------- Lo. AROS. enhancement or user supplied 


DP DD | --------- Peripheral I/0 
C000 | --------- 
XX peeenenne- XX — — —e User specified RAM memory size 
(HIMEM: ) 
S User Workspace 
(LOMEM: ) 
TFF poenn----- 2K ‘ Screen Memory 
466 }--------- IK 
pg t...----.-- g _——~ Internal Workspace 
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READ/SAVE DATA SUBROUTINE 


INTRODUCTION 

Valuable data can be generated on the Apple II computer and sometimes 
it is useful to have a software routine that will allow making a permanent 
record of this information. This paper discusses a simple subroutine that 
serves this purpose. 

Before discussing the Read/Save routines a rudimentary knowledge of 
how variables are mapped into memory is needed. 

Numeric variables are mapped into memory with four attributes. Appearing 
in order sequentually are the Variable Name, the Display Byte, the Next Variable 
Address, and the Data of the Variable. Diagramatically this is represented as: 


VN DSP NVA DATA(9) DATA(1)....  DATA(N) 


VARIABLE NAME - up to 100 characters 
represented in memory as ASCII equi- 
valents with the high order bit set. 


DSP (DISPLAY) BYTE - set to 91 when 

DSP set in BASIC initiates a process 
that displays this variable with the 
line number every time it is changed 
within a program. 


NVA (NEXT VARIABLE ADDRESS) - two 
bytes (first low order, the second 
high order) indicating the memory 
location of the next variable. 


DATA - hexadecimal equivalent of 
numeric information, represented 
in pairs of bytes, low order byte 
first. 
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String variables are formatted a bit differently than numeric ones. 
These variables have one extra attribute - a string terminator which desig- 
nates the end of a string. A string variable is formatted as follows: 


VN DSP NVA DATA(Q) DATA(1).... DATA(n) ST 


VARIABLE NAME - up to 199 characters 
represented in memory as ASCII equi- 
valents with the high order bit set. 


DSP (DISPLAY) BYTE - set to 91 when 
DSP set in BASIC, initiates a process 
that displays this variable with the 
line number every time it is changed 
within a program. 


NVA (NEXT VARIABLE ADDRESS) - two 
bytes (first low order, the second 
high order) indicating the memory 
location of the next variable. 


DATA - ASCII equivalents with high 
order bit set. 


STRING TERMINATOR (ST) - none high 

order bit set character indicating 

END of string. 

There are two parts of any BASIC program represented in memory. One is 

the location of the variables used for the program, and the other is the actual 
BASIC program statements. As it turns out, the mapping of these within memory 
is a straightforward process. Program statements are placed into memory starting 
at the top of RAM memory* unless manually shifted by the "HIMEM::" command, and 
are pushed down as each new (numerically larger) line numbered statement is 
entered into the system. Figure la illustrates this process diagramatically. 
Variables on the other hand are mapped into memory starting at the lowest position 
of RAM memory - hex $899 (2948) unless manually shifted by the "LOMEM :" command. 
They are laid down from there (see Figure 1b) and continue until all the variables 
have been mapped into memory or until they collide with the program statements. 
In the event of the latter case a memory full error will be generated 


*Top of RAM memory is a function of the amount of memory. 
16384 will be the value of "HIMEM:" for a 16K system. 
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The computer keeps track of the amount of memory used for the variable 
table and program statements. By placing the end memory location of each into 
$CC-CD( 294-295) and $CA-CB(293-294), respectively. These are the BASIC 
memory program pointers and their values can be found by using the statements 
in Figure 2. CM defined in Figure | as the location of the end of the variable 
tape is equal to the number resulting from statement a of Figure 2. PP, the 
program pointer, is equal to the value resulting from statement 2b. These 
statements (Figure 2) can then be used on any Apple II computer to find the 
limits of the program and variable table. 


FINDING THE VARIABLE TABLE FROM BASIC 

First, power up the Apple II, reset it, and use the CTRL B (control B) 
command to place the system into BASIC initializing the memory pointers. Using 
the statements from Figure 2 it is found that for a 16K Apple II CM is equal to 
2948 and PP is equal to 16384. These also happen to be the values of LOMEN and 
HIMEN: But this is expected because upon using the B° command both memory 
pointers are initialized indicating no program statements and no variables. 

To illustrate what a variable table looks like in Apple II memory suppose 
we want to assign the numeric variable A ($C1 is the ASCII equivalent of a with 
the high order bit set) the value of -1 (FF FF in hex) and then examine the 
memory contents. The steps in this process are outlined in example I. Variable A 
is defined as equal to -1 (step 1). Then for convenience another variable - B - 
is defined as equal to @ (step 2). Now that the variable table has been defined 
use of statement 2a indicates that CM is equal to 2969 (step 3). LOMEN has not 
been readjusted so it is equal to 2948. Therefore the variable table resides in 
memory from 2048 ($899 hex) to 2969 ($80C). Depressing the "RESET" key places 
the Apple II into the monitor mode (step 4). 


We are now ready to examine the memory contents of the variable table. 
Since the variable table resides from $899 hex to $89C hex typing in "899.8@C" 
and then depressing the "RETURN" key (step 5) will list the memory contents of 
this range. Figure 3 lists the contents with each memory location labelled. 
Examining these contents we see that Cl is equal to the variable name and is the 
memory equivalent of "A" and that FF FF is the equivalent of -1. From this, since 
the variable name is at the beginning of the table and the data is at the end, the 
variable table representation of A extends from $899 to $805. We have then found 
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the memory range of where the variable A is mapped into memory. The reason for 
this will become clear in the next section. 


READ/SAVE ROUTINE 

The READ/SAVE subroutine has three parts. The first section (lines @-10) 
defines variable A and transfers control to the main program. Lines 20 through 
26 represents the Write data to tape routine and lines 3-38 represent the Read 
data from tape subroutine. Both READ and SAVE routines are executable by the 
BASIC "GOSUB X" (where X is 29 for write and 39 is for read) command. And as 
listed these routines can be directly incorporated into almost any BASIC program 
for read and saving a variable table. The limitation of these routines is that 
the whole part of a variable table is processed so it is necessary to maintain 
exactly the dimension statements for the variables used. 


The variables used in this subroutine are defined as follows: 


A= record length, must be the first variable defined 

CM= the value obtained from statement a of figure 2 

LM= is equal to the value of "LOMEM:" 

Nominally 2948 

SAVING A DATA TABLE 

The first step in a hard copy routine is to place the desired data onto 
tape. This is accomplished by determining the length of the variable table and 
setting A equal to it. Next within the main program when it is time to write the 
data a GOSUB29 statement will execute the write to tape process. Record length, 
variable A, is written to tape first (line 22) followed by the desired data 
(line 24). When this process is completed control is returned to the main program. 


READING A DATA TABLE 

The second step is to read the data from tape. When it is time a GOSUB3@ 
statement will initiate the read process. First, the record length is read in 
and checked to see if enough memory is available (line 32-34). If exactly the 
same dimension statements are used it is almost guaranteed that there will be 
enough memory available. After this the variable table is read in (line 34) and 
control is then returned to the main program (line 36). If not enough memory 
is available then an error is generated and control is returned to the main pro- 
gram (line 38) 
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EXAMPLE OF READ/SAVE USAGE 

The Read/Save routines may be incorporated directly into a main program. 
To illustrate this a test program is listed in example 2. This program dimensions 
a variable array of twenty by one, fills the array with numbers, writes the data 
table to tape, and then reads the data from tape listing the data on the video 
display. To get a feeling for how to use these routines enter this program and 
explore how the Read/Save routines work. 


CONCLUSION 

Reading and Saving data in the format of a variable table is a relatively 
straight forward process with the Read/Save subroutine listed in figure 4. This 
routine will increase the flexibility of the Apple II by providing a permanent 
record of the data generated within a program. This program can be reprocessed. 
The Read/Save routines are a valuable addition to any data processing program. 
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Var] Varg seeeeee Vary Memory. 
Tonen CM End of f, beginning 

$899 Variable of 

Table Program 
ee e*—n__ CEO” 
b 
Variable Data 
Figure | 


a) PRINT PEEK(24) + PEEK(295)*256 


b) PRINT PEEK(292) + PEEK(293)*256 


Figure 2 


899 891 892 893 804 895 896 
Cl 99 96 @8 FF FF C2 99 QC 
L H L H cL 
VAR DSP NVA DATA VAR DSP NVA 
NAM NAM 
1 
Figure 3 


$809.89C rewritten with labelling 
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mre Pz... Png Ph-] Ph 


a 


BASIC Program 


=> 


pp 


-> 


CM 


897 808 899 SPA 8PB 8sPC 


99 
DATA 


98 99 PP 
H 


READ/SAVE PROGRAM 


p 


10 


20 


22 


24 


26 


30 


32 


34 


36 


38 


A=9 


GOTO 199 


PRINT "REWIND TAPE THEN 
START TAPE RECORDER": 
dl “THEN HIT RETURN", 
B 


A=CM-LM: POKE 60,4: 
POKE 61,8: POKE 62,5: 
POKE 63,8: CALL -307 


POKE 69,LM MOD 256: 
POKE 61, LM/256: 
POKE 62, CM MOD 256: 
POKE 63, CM/256: 
CALL -397 


PRINT "DATA TABLE SAVED": 
RETURN 


PRINT "REWIND THE TAPE 
THEN START TAPE RECORDER": 
il "AND HIT RETURN", 

B 


POKE 69,4: POKE 61,8: 
POKE 62,5: POKE 63,8: 
CALL -259 


IF A<@ THEN 38: P=LM+A: 
IF P>HM THEN 38: CM=P: 
POKE 69, LM MOD 256: 

POKE 61, LM/256: POKE 62, 


CM MOD 256: POKE 63, CM/256: 


CALL -259 


PRINT "DATA READ IN": 
RETURN 


PRINT "***TOO MUCH DATA 
BASE***": RETURN 


FIGURE 4b 


COMMENTS 


This must be the first statement in the 
program. It is initially 9, but if data 
is to be saved, it will equal the length 
of the data base. 


This statement moves command to the main 
program. 


Lines 20-26 are the write data to tape 
subroutine. 


Writing data table to tape 


Returning control to main program. 


Lines 30-38 are the READ data from tape 
subroutine. 


Checking the record length (A) for memory 
requirements if everything is satisfactory 
the data is READ in. 


Returning control to main program. 


NOTE: CM, LM and A must be defined within the main program. 
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1 3 >A=1 Define variable A=-1, then hit RETURN 


2 >B=9 Define variable B=, then hit RETURN 
> 
3. >PRINT EEK (204) + PEEK Use statement 2a to find the end of 
(205) * 256 the VARIABLE TABLE 


computer responds with= 
2969 


4 > Hit the RESET key, Apple moves into 
* Monitor mode. 
5 *899.89C Type in VARIABLE TABLE RANGE and HIT 


the RETURN KEY. 
Computer responds with: 
9899- Cl OP 86 98 FF FF C2 Op 


9898 PC 98 OP OP OD 


Example 1 
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LIST 

8 f=8 

id GOTO 188 

2@ REM WRITE DATA TO TAPE ROUTINE 

c2 A=CH-LA: POKE 66,4: POKE 61 
v8: POKE 62,5: PORE 63,8: CALL 
- 307 

24 POKE 68,LH MOG 256: POKE 6! 
»LH/256: POKE 62,CR ROD 236 
: POKE 63,CH/256: CALL -387 


26 RETURN 

36 RER READ CATA SUBROUTINE 

32 POKE 66,4: PORE o1,8: PORE 
62,9: POKE 63,8: CALL -259 

34 IF AC@ THEN 38:P=Liith: IF F> 
HM THEN 38:CR=P: PORE 68,LN RD 
256: POKE 6i,LA256: POKE 62 
ACH NGG 256: POKE 63, Ch/256 
: CALL -255 

36 RETURH 


38 PRINT “#ee 700 HUCH DATA BASE #4 


#": END 
1#@ DIM ASL) X26) 
185 FOR I=1 TQ 2@:8¢f)=1: WEST 


T 
3 


128 LM=2048: CA-e106:A=38; HR= 16383 


118 PRINT "26 HUMBERS GENERATED® 


120 PRINT "NOU VE ARE GOING TO SAVE 
THE DATA": PRINT "WHEN YOU ARE R 
ERDY START THE RECORDER IH RECOR 
D ODE": INPUT "AND HIT RETURN” 
if 

i38 CALL -936: PRINT "NOW URITING DA 
TR TG TRPE*: GOSUB cd 

135 PRINT “HOW THE DATA [5 SAVED" 


140 PRINT "OU WE ARE GOIHG TO CLEAR 
THE X(28) TABLE AND READ THE DA 
Th FROH TAPE® 

150 FOR I=1 70 2:X(1)=@: PRINT 
"RCsTs")= "sk(D)s WERT I 

164 PRINT "NOW START TAPE RECORDER" 
: INPUT "AND THEN HIT RETURN" 
ff 

165 PRINT "A *,A 

178 GOSUB 36 

188 PRIKT "ALL THE DATA READ IN? 


198 FOR [=i TU 2@: PRINT *X¢ "31 
")= "sX1)s MEST I 

195 PRINT "THIS 15 THE END® 

c6e END . 
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A SIMPLE TONE SUBROUTINE 


INTRODUCTION 

Computers can perform marvelous feats of mathematical computation 
at well beyond the speed capable of most human minds. They are fast, 
cold and accurate; man on the other hand is slower, has emotion, and makes 
errors. These differences create problems when the two interact with one 
another. So to reduce this problem humanizing of the computer is needed. 
Humanizing means incorporating within the computer procedures that aid in 
a program's usage. One such technique is the addition of a tone subroutine. 
This paper discusses the incorporation and usage of a tone subroutine within 
the Apple II computer. 


Tone Generation 

To generate tones in a computer three things are needed: a speaker, 
a circuit to drive the speaker, and a means of triggering the circuit. As it 
happens the Apple II computer was designed with a two-inch speaker and an 
efficient speaker driving circuit. Control of the speaker is accomplished 
through software. 

Toggling the speaker is a simple process, a mere PEEK - 16336 ($CQ3Q) 
in BASIC statement will perform this operation. This does not, however, 
produce tones, it only emits clicks. Generation of tones is the goal, so 
describing frequency and duration is needed. This is accomplished by toggling 
the speaker at regular intervals for a fixed period of time. Figure 1 lists 
a machine language routine that satisfies these requirements. 


Machine Language Program 

This machine language program resides in page @ of memory from $92 (2) 
to $14 (29). $99 (9) is used to store the relative period (P) between 
toggling of the speaker and $91 (1) is used as the memory location for the 
value of relative duration (D). Both P and D can range in value from $99 (9) 
to $FF (255). After the values for frequency and duration are placed into 
memory a CALL2 statement from BASIC will activate this routine. The speaker 
is toggled with the machine language statement residing at $92 and then a 
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delay in time equal to the value in $$9 occurs. This process is repeated until 
the tone has lasted a relative period of time equal to the duration (value in $91) 
and then this program is exited (statement $14). 


Basic Program 

The purpose of the machine language routine is to generate tones controllable 
from BASIC as the program dictates. Figure 2 lists the appropriate statement that 
will deposit the machine language routine into memory. They are in the form of 
a subroutine and can be activated by a GOSUB 32999 statement. It is only necessary 
to use this statement once at the beginning of a program. After that the machine 
language program will remain in memory unless a later part of the main program 
modifies the first 29 locations of page 9@. 

After the GOSUB 32999 has placed the machine language program into memory 
it may be activated by the statement in Figure 3. This statement is also in the 
form of a GOSUB because it can be used repetitively in a program. Once the fre- 
quency and duration have been defined by setting P and D equal to a value between 
9 and 255 a GOSUB 25 statement is used to initiate the generation of a tone. The 
values of P and D are placed into $@@ and $91 and the CALL2 command activates the 
machine language program that toggles the speaker. After the tone has ended 
control is returned to the main program. 

The statements in Figures 2°and 3 can be directly incorporated into BASIC 
programs to provide for the generation of tones. Once added to a program an 
infinite variety of tone combinations can be produced. For example, tones can 
be used to prompt, indicate an error in entering or answering questions, and 
supplement video displays on the Apple II computer system. 

Since the computer operates at a faster rate than man does, prompting can 
be used to indicate when the computer expects data to be entered. Tones can be 
generated at just about any time for any reason in a program. The programmer's 
imagination can guide the placement of these tones. 


CONCLUSION 

The incorporation of tones through the routines discussed in this paper 
will aid in the humanizing of software used in the Apple computer. These routines 
can also help in transforming a dull program into a lively one. They are relatively 
easy to use and are a valuable addition to any program. 
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6b66- FF 27? 


Bobi- FF 2??? 

ob4e- AD 36 C6 LDA $C@36 
B665- 33 DEY 

Hgb6E- De &4 BNE $HG6C 
Gou8- Ce @i DEC $61 
G6GR- Fu &S BEQ $6014 
GbBC- CA DEX 

e60D- D@ Fe BNE $4605 
GGGF—- He 6G LDa $66 
e61ii- 4C G2 Gy JMP $6662 
oG14- 66 RTS 


FIGURE 1. Machine Language Program 
adapted from a program by P. Lutas. 


32868 POKE 2,173: POKE 3,48: POKE 
4,192: POKE 5,136: POKE 6,208 
: POKE 7,4: POKE 8,198: POKE 
9,1: POKE 16,248 

32885 POKE 11,8: POKE 12,262: POKE 
13,208: POKE 14,246: POKE 15 
»l66: POKE 16,6: POKE 17,76 
> POKE 18,2: POKE 19,8: POKE 
26,96: RETURN 


FIGURE 2. BASIC "POKES" 


eo POKE 8,P: POKE £,D: CALL 2: 
RETURN 


FIGURE 3. GOSUB 
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High-Resolution Operating Subroutines 


These subroutines were created to make programming for 
High-Resolution Graphics easier, for both BASIC and machine. 
language programs. These subroutines occupy 757 bytes of memory 
and are available on either cassette tape or Read-Only Memory 


(ROM). This note describes use and care of these subroutines, 


There are seven subroutines in this package. With these, 
a programmer can initialize High-Resolution mode, clear the screen, 
plot a point, draw a line, or draw and animate a predefined shape. 
on the screen. There are also some other general-purpose 


subroutines to shorten and simplify programming. 


BASIC programs‘aan access these subroutines by use of ,the 
CALL statement, and can pass information by using the POKE state- 
ment. There are special entry points for most of the subroutines 
that will perform the same functions as the original subroutines 
without modifying any BASIC pointers or registers. For machine 
language programming, a JSR to the appropriate subroutine address 


will perform the same function as a BASIC CALL. 


In the following subroutine descriptions, all addresses 
given will be in decimal, The hexadecimal substitutes will 
be preceded by a dollar sign ($). <Allrentry points given are 
for the cassette tape subroutines, which load into addresses 
C96 to FFF (hex). Equivalent addresses for the ROM subroutines 


will be in italie type face. 
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High-Resolution Operating Subroutines 


INIT Initializes High-Resolution Graphics mode, 
From BASIC: CALL 3972 (or CALL -12288) 


From machine language: JSR $C§P (or JSR $DIIG) 


This subroutine sets High-Resolution Graphics mode with a 
289 x 169 matrix of dots in the top portion of the screen and 
four lines of text in the bottom portion of the screen. INIT 


also clears the screen. 


CLEAR Ciears the screen, 
From BASIC: CALL 3886 for CALL -12274) 


From machine language: JSR $CGE (or JSR S$DIPJE) 


This subroutine clears the High-Resdlution screen without 


resetting the High-Resdlution Graphics mode. 


PLOT Plots a point on the screen. 
From BASIC: CALL 37898 (or CALL -11588) 


From machine language: JSR $C7C (or JSR $D97C) 


This subroutine plots a single point on the screen. The 
X and Y coodinates of the point are passed in locations 898, 
881, and 8@2 from BASIC, or in the A, X, and Y registers fron 


machine language. The Y (vertical) coordinate can be from § 
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High-Resloution Operating Subroutines 


PLOT (continued) 

(top of screen) to 1598 (bottom of screen) and is passed in 

location 882 or the A-register; but the X (horizontal) coordinate 
can range from § (left side of screen) to 279 (right side of screen) 
and must be split between locations 8$f (X MOD 256) and 891 
(X/256).or, from machine language, between registers X (X LO) 

and Y (X HI). The color of the point to be plotted must be set 

in location 812 ($32C). Four colors are possible: § is BLACK, 


8S ($55) is GREEN, 1769 ($AA) is VIOLET, and 25S ($FF) id WHITE. 


POSN Positions a point on the screen. 
From BASIC: CALL 3761 (or CALL -11599] 


From machine language: JSR $C26 (or JSR $D9/26) 


This subroutine does all calculations for a PLOT, but does 
not plot a point (at leaves the screen unchanged). This is useful 
when used in conjumction with LINE or SHAPE (described later). 

To use this subroutine, set up the X and Y coordinates just the 


same as for PLOT. The color in location 812 ($32€) is ignored. 


LINE Draw a line on the screen. 
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High-Resolution Operating Routines 


LINE Draws a line on the screen. 
From BASIC: CALL 3786 for CALL -11574) 
From machine language: JSR $C9S (or JSR $D9/95) 


This subroutine draws a line from the last point PLOTted 
or POSN'ed to the point specified, One endpoint is the last point 
PLOTted or POSN‘ed; the other endpoint is passed in the same manner 
as for a PLOT or POSN. The color of the line is set in ‘location 
812 ($32C). After the line is drawn, the new endpoint becomes the 


base endpoint for the next line drawn. 


SHAPE Draws a predefined shape on the screen. 
From BASIC: CALL 3895 (or CALL -11555) 
From machine language: JSR $DBC for JSE $D1BC) 


This subroutine draws a predefined shape on the screen at 
the point previously PLOTted or POSN‘ted. The shape is defined 
by a table..of vectors in memory. (How to create a vector table 
will be described later). The starting address of this table 
should be passed in locations 804 and 80S from BASIC .or inthe’ 
Y and X registers from machine language. The color of the shape 
should be passed in location 28 ($1C). 

There are two special variables that are used only with shapes: 
the scaling factor and the rotation factor. The scaling factor 
determines the relative size of-the shape. A scaling factor of 
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High-Resolution Operating Subroutines 


SHAPE (continued) 

1 will cause the shape to be drawn true size, while a scaling 
factor of 2 will draw the shape double size, etc. The scaling 
factor is passed in location 896 from BASIC or $32F from machine 
language. The rotation factor specifies one of 64 possible angies 
of rotation for the shape. A rotation factor of § will cause the 
shape to be drawn right-side up, where a rotation factor if 16 
will draw the shape rotated 90° clockwise, etc. The rotation 
factor is passed in location 897 foom BASIC of in the A-register 


from machine language. 


The table of vectors which defines the shape to be drawn is 
a series of bytes stored in memory. Each byte is divided into 
three sections, and each section specifies whether or not to plot 
a point and also a direction to move (up, down, left, or right). 
The SHAPE subroutine steps through the vector table byte by byte, 


and then through each byte section by section. When it reaches 
a 66 byte, it is finished. 


The three sections are arranged in a byte like this: 


oD= 
see epee) EE 
| +) e Na 


a ee ee : 
chen 3 Scecheon @& $e ction | '% < 
Each bit “pair DD specifies a direction to move, and the two bits 


P specify whether or not to plot a point before moving. Notice 
that the last section (most Significant bits) does not have a P 


field, so it can only be a move without plotting. The SHAPE 
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High-Resolution Operating Subroutines 


SHAPE (continued) 

subroutine processes the sections from right to left (least 
significant bit to most significant bit). IF THE REMAINING SECTIONS 
OF THE BYTE ARE ZERO, THEN THEY ARE IGNORED. Thus, the byte 


cannot end with sections of $$ (move up without plotting). 


Here is an example of how to create a vector tables - 


Suppose we want to draw a shape like this: 


eo? ®@ 


First, draw it on graph paper, one dot per square, Then decide 
where to start drawing the shape. Let's start this one in the center, 
Next, we must draw a path through each point in the shape, using 


only 90° angles on the turns: 


Next, re-draw the shape as a series of vectors, each one moving 
one place up, down, left, or right, and distinguish the vectors that 


plot a point before moving: 


Now “unwrap™ those vectors and write them in a straight line. 


LE BEPEDVOADVECL + < 


Now draw a table like the one in Figure 1. For each vector inthe 
line, figuee the bit code and place it in the next available section 
in the table, If it will not fit or is a 9f at.the end of a byte, 


then skip that section and go on to the next. When you have finished 
51 


High-Resolution Operating Subroutines 


SHAPE (continued) 

coding all vectors, check your work to make sure it is accurate. 
Then make another table (as in figure 2) and re-copy the coded 
vectors from the first table. Then. decode the vector information 
into a series of hexadecimal bytes, using the hexidecimal code 
table in figure 3. This series of hexadecimal bytes is your shape 
definition table, which you can now put into the Apple II's memory 


and use to draw that shape on the screen. 


o2 


vectors: 


Shape 


LEVER BREST 39 RPAINIVUWYES 


Coote 


t= vector can nor b e 


3 
J 
—| Oedwne hd FP OrDTaOyaw bt 
P 
Tee OETTTTE ETE EATS 
J 
ww j 00-- 9790" 9 4-709 -- 
2 0909090000-7—-~--~- 
+ S 
vd 2 
vy? 3+ 
>¢ 3 
: fe 
<a" gh 
ra vw 
¢6 +70. 


NE STQUVYUY S 


» 


Fiygvee 


yjOQ 70700000 0 
000000 990090 


Figyvet 


Ce N Me HIRO” 
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00,20 
he 


BR HERES DCAO-BASiC LISTING 


i THDISSe fe CLERR= Jeo: PUSHES bi 


:PLGT=S PRB: LIKE=3786s SHAPE 
S885: F [HD=2667s SENTEL=2848 


S RIE Vligs ¥Yria: 
> PGF: Sf tsa Ft sh; 
w Fast Fey imi, ft tas 


tb TERT + CLL 936s VIRB 4 Th 


PRINT * ses HIGH RESOLUT! 
BAGUIO BEBAC eee. ERTHT 


RATRiLS POEL #345 "3s FEILER 


He PRE] an DRHE ti LIHE veh ay ans 


if fEPLRE. GETHT #4 Lounow cuger 
LD OSPELO*? PRINT “¢ mee SHEPE 


FRRIELTE iki LHTG CORNER 


aut 6 Hi “RES DORUT": PRIRG 


PGIT . GGLAT SLTT GRE FEU cao u 
PRi PRI: ALE HAY RET Fue i 
CL ROMGE. DGTHT 8TeEE irnutent ft 
be UL PELRL TTFE ‘LURIEEL L 
TThii THE TURE IT 

aria titi 


z 

ae Tf visi Af viua THER gf. obi 

30 S142 UR Aleve TRLA LB: LALL 
i 


188 CALL TRETsH=4@:Y-R: GOGUB 2888 


- 
TEL: 


a hii Dat 
: PORE 2 li cu A CALL PLO 


Yo BUR fO054.¥=- BI fidhis GOCE 
A> F ,fag 2,97 PAG tise: GHue 


me ne te gmacmes wee fa TT; 
wisisess P7232 fF Peghbs fh sy; 
CHB: LHLL LiRE: ii HUG RED 


S83 TULL LGD 33 ° GFrEe : 
L2H? PRLA FUAL 2a,% PEER & 


4S ta BE, F335 4 BGR 4425. facie. 
ed3¢ BHD €33423 BOD 4495: GUSUE 


r pat ee 
T-i Th “G. CAG t-41 Th &. GOEL 
i=} Hi FUR iTL Gi x: FURL 
She Uy Hot. GOL, DOYLE on: 
tHe» Af uu Cani FURL GHi, 

TLLGES., BGC 800 vit 
BV i Pf£ ruAE aHe i ifs Ci a 


si 6 


3808 IF PEEK (-16984% 
tf 


338 -IF RND (588{C THER POKE 28 
» RAD €45¢85:Y=VtTDIReB: IF 
ve ANG Vi. 166 THEN 316: YDIR= 
“YOUR: ¥=-Y: IF Y<@ WHEN Y=74 
318: GO5UB 3088: GOTO 316 
G80 PORE -16362,0: POKE 762,52 POKE 
’b9,8: PORE 366,148: PORE 38! 
yO: PORE 382,0: PORE S84,6: 
POKE 825,32 PORE oi2,255: CALL 
PSK 
bid FOR R-G TC 4168: PORE 287,2 HOD 
ba: PURE o86,2+63 HOT CR ROD 
boi: CALL SHAPEs HES? R: GGSUB 


766 J= RHO GiB} + BHD CiB):K= RAD 
(33H RHE CSE} BRD CoB )sL= 
ERE or PRINT "FREG#I= ° 
yup° FREGBE= "GK 
Pié SO5UE 4988: GOSUB Be: GOTH 
788 
OBG [HPUT “REL FREQ #i=",J: INPUT 


"REL FREY es Ks is “REDE (8 


=S5L1 
BSUG 4888: G0SU S888: GOTO 
me 


THER RETURH 


-te 
> GUI 


4000 CALL THiT: PORE $12,235: R=8 


:B=: FOR 128 TO 279: A=( Atl) 
AO 256:B=(BtK) HOD 254:Y= 

( PEEE (SINTBLHAD+ PEEK (SIRTBL+ 
Bias i6 


4018 POKE G88,1 AOD 256: PURE Sei 


ai: oa: P PORE $8z YT: PALL LINE- 
Ge RUT 1 GR L}: HERT I: RETURK 


04 


cide + Guu aia RETR 


210 KC DI=CRCL-K 897 104%s YT )=( 
VOL)-7)89/1647: HEXT I,J: GOSUB 
3068: GOTO 208 

386 CALL IRIT:X= RND (24 )910+20 

f= RAD (143910+20: POKE 812 
, PND (33885485: GOSUB 2008 
: CALL PLOT 

318 1F RD (10883¢1 THEN 380: IF 

HOT RAD (268) THEN POKE 28, 
RHE (4485 

320 Hi=X+¢ RAD (39-1825: YL=¥+0 
RAD (33-L)ei5s IF KK@ OR 
81879 OR YIX@ OR YEH159 THEE 
328 

330 HEXLsV=¥1: GOSUB 2886: CALL 
LIKE: GOSUE 3888: GOTO 310 

400 GOSUB 1808: POKE 812, RND ( 
33485485: CALL PLOT 

410 FOR J=t 10.25: FOR I=1 TOR: 
POKE $8,X(1) HOD 255: POKE 
B61 ,23255: POKE 882,41}: CALL 
LANE 

428 KCK 1-041 1)-80809/18 
+05: C15 101 -B8-( KC 10-88) 
/$ye5 LOGON Do=Ke NEXT 1, 
js GOSUB 3868: GOT 460 

500 CALL INIT: POKE 280,0: CALL 
PLOT: X28: ¥=8: XDIR=1: YDIR=1: 
A=5:8=3:C=8 

518 POKE 886,@: POKE 61,8: POKE 
42,7: CALL LINE: POKE 808, 
(279-2) HOD 256: POKE 881 ,3¢ 
24: PORE 802,159: CALL LINE: 
PORE 880,23: POKE 801,41: POKE 
G2,159-¥: CALL LINE 

515 IF RND (500) THEN 520:4=f+ RMD 
(13: 82+ RHP (8): C=d+ RAD 


a Be 
ee | 
rd 


526 POKE 880,X HOD 250: POKE 8@i 
»23855: POKE 882.4: CALL LINE: 
RORHRDIRGA: IF Ri=8 AND KizGG 

THEH S30:2DIR=-XDIRSK=-X: IF 
446 THEN X=#+558 


ROD'S COLOR PATTERN 


PROGRAM DESCRIPTION 

ROD'S COLOR PATTERN is a simple but eloquent program. It generates a 
continuous flow of colored mosaic-like patterns in a 49 high by 49 wide 
block matrix. Many of the patterns generated by this program are pleasing 
to the eye and will dazzle the mind for minutes at a time. 


REQUIREMENTS 
4K or greater Apple II system with a color video display. 


BASIC is the programming language used. 


PROGRAM LISTING 


100 GR 
185 FOR ¥=3 TO 58 
118 FOR I=1 10 19 
115 FOR J=8 10 19 
128 K=14] 
138 COLOR=J43/( 143)4T90/12 
135 PLOT-I,K: PLOT KjIy PLOT 4G 

-},48-x 
136 PLOT 48-K,40-I: PLOT K,40-I: 

PLOT 48-1,K: PLOT 1,4@-K: PLOT 

40-K,1 
148 NEXT J, 1 
145 NEXT ¥: GOTO 185 - 
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PROGRAM LISTING: PONG 


ie 


RER PONG BY WENDELL SITTER 


TCRES CONTROL 
AFTER # OAISS 


RNG AT 
26 GR 
5 DIM PC3): DIN HPECLED 


38 fie38sB=1sC=-1 


33g “~% «TPT Ms 33 


COLGRE3: HELIN 1,28 #7 @: HLER 
18 aT 7 


RLL OR FONG 2 es 
[NPUT "PADDL 


eri 
re 
r 


LALL -936 
- HPSC138"H" THER 28 
Hai: COLGR=1S: 
26 GOTG cao 
ia A=H we 


+ 
i 


# Ti: 2 38 G 
fLIB- G33 A 


go: IF YC THEN Y=i: IF 1238 


a-¥i 


: FUR ee TG og: PEER 


iF of oF Re3940 THEN 85: CLR 
a: PLOT 2-£,77: CHLGR=i3: PLOT 
Ari 

Ww=¥: IF & AGB 2-8 THEN GG5UE 


iF SORNCA Teal 22048 BRD OT 


¥-1))56 THER 163 


Par Tod Thr @4.2.0 RPTL £332 
FHE (=i GU GBIAS PEER t-il63i6 
= iT T 
Hs REAG ft 
rae} } TH 3 - 
it AAD 2 tv itt iss 
AG i 5 
seemiyah) 
iF SPP THEN ¥=3: 1F Y=PP+i 
Ts st) 3 TP womP. Ter it bl 
THEN Use: IF ¥=PPse THEN ¥= 


120 IF Y=PP+3 THEN V=-i: IF Y=PP+ 
4 THEN ¥=-2: IF Y=PP+5 THEN 


THER ¥=3- RAD C7} 
on PLOT a-2,7 

i AND C280 OR C¥YO= HBS 
ANG 2-6) THEW ¥=4- RED 


148 iF X20 THER ¥¥0= ABS CY) 
145 =39-fi8=35-B:0=-€ 
ibd LF PEEK i-ieed6)>ic7 ARE 54 
S THER S=Sti 
55 IF PEEK ¢-16297)3 
@ THEN 5-5-1 
6@ SOTO 65 
65 COLORG: FLOT X-C,' 
f# COLUR=13: PLOT 2 YtV¥el Teee- 
i AND Y#¥¢48) 
i75 FOR T=i 19 75eHe PEEK (-16336 
}+ PEEK (-i6396}- PEER {-16336 
3: NEXT 7 
i968 IF X=0 THER SR=SR+i: IF ¥=39 
THER SL=SL+i 
i85 VIAR 23: TAB 7: 


at PRINT SF 


ie? ARD Sd 


i 
H 
at 
i 


PRINT SL3: TRB 


i968 COLOR=6: PLOT a-£,7 
i335 TF SL=i3 OR SR=i3 THER 268 
268 COLOR=8: PLOT &,it¥eCT+¥)-1 


a: IF T RGD 38 

F PEER i-lo2t63 
Hi? No 515 THEH S=5+is IF 
E 127 ARG S38 THER 


tons wel 


a GO5uE 235: KERT T 
15 YSPC): TF 920 THEN YY=PCA 
) 


cea IF H THEN T7= RED CS? 1 
cea ¥=i- RAD (3) 
cad GOT0 65 


06 


235 IF H THEN 245:PC1)=¢C POL ( 
1)-24)#20 97115: IF PCL)=PC3 
) THEN 245: {F PCL) THEN 
POi}=@: IF PC1355359 THEN PC 
1)=39-5 

vOLUR=6: VLIN FOLR,PCLd+S aT 

: COLOR=@: IF PCiI9PC3) THE 
WIN Q,POi-1 AT 39: IF PC 
KPC) THEN ¥LIK PCL}S+1 

AD S9sPC33-Pc i} 
eds Po@}=(¢ POL (83-24 928)7145 
: IF POG)@ THER PCB)=0: IF 
Pg} ME) THEH RETURE : IF 
P(GH5399 THER PC B)=39-5 
258 col OR=6: VLIN PCG), PCG)+5 AT 
: COLOR=@: IF PC@)9P(2) THEN 
q IN G,PC@+1 AT Gs IF PCO) 
{PC2) THEN YLIN PC@)+S+1,39 
AT @ 

255 COLOR=8: IF PCB)3PCE} THEN. 
YLiR G,PiG)-1 AT ds iF Poa) 
cPt2) THEN vu | OSH 

AT PIP : RETHRN 

268 PRINT * ED 


I i 
= 
Sie 


N 


COLOR SKETCH 


PROGRAM DESCRIPTION 

Color Sketch is a little program that transforms the Apple II into an 
artist's easel, the screen into a sketch pad. The user as an artist 

has a 49 high by 49 wide (1699 blocks) sketching pad to fill with a 
rainbow of fifteen colors. Placement of colors is determined by 
controlling paddle inputs; one for the horizontal and the other for 

the vertical. Colors are selected by depressing a letter from A through 
P on the keyboard. 


An enormous number of distinct pictures can be drawn on the sketch pad 
and this program will provide many hours of visual entertainment. 


REQUIREMENTS 
This program will fit into a 4K system in the BASIC mode. 
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PROGRAM LISTING: COLOR 


2 POKE 2,173: POKE 3,48: POKE 
4,192: POKE 5,165: POKE 6,8 
> PORE ¢,de: POKE 8,168: POKE 
9,cve: POKE 16,165: POKE 11 
yl: PORE 12,288: POKE 13,4 
19 POKE £4,198: POKE 15,24: POKE 
16,248: POKE 17,5: POKE 18, 
198: POKE 19,1: POKE 28,76: 
POKE cl,2: POKE 22,8: *POKE 
es, 36 
13 DIR BS¢48): TEXT : CALL -336 
: GOTO 98 
cé CALL -936: G0T0 96 
co A= LEN(B$): FOR 2-1 TO As GOSUB 
bo: PRINT B§(2,233: HERT 2: 
GOSUB 78: RETURN 
30 B$="seeeneeeseeenesteeeeresesees 
eecesasesay": RETUFH 
30 BS="COLOR SKETCH?: RETURH 
48 BS="CGPYRIGHT APPLE CORPUTER 197 
(*: RETURN 
43 BS="THIS PROGRAM ALLOWS YOU TG ° 
: RETURN 
36 B$="SKETCH COLORED: FIGURES IN" 
: RETURN 
39 BE="LO¥ RESOLUTION GRAPHICS WITH 
PHDDLES": RETURH 
68 KK=28:TON=26: GOSUB 5: RETURN 


63 KK=16: TON=1G: GOSUE 95: RETURN 

78 KR=20:TON=58: GOSUB 95: KK=36 
STGH=96: GOSUB 83: RETURN 

79 KE=c8: TON=c8: GOSUB 95: RETURH 


GB KR=8: TOH=258: GOSUB 85:KK=9 
STUNS29@: GOSUB $3: RETURH 


SKETCH 


85 POKE 1,TON MOD 256: POKE 24 
JTOH/256+1: POKE @,kK: CALL 
2: RETURN 
98. G0SUB 38: GOSUB 25: PRINT : 
TAB 13: GOSUB 35: GOSUB 25 
: PRINT : GOSUB 38: GOSUB 25 
: PRINT : TAB S: GOSUB 40: GOSUB 
25: PRINT : GOSUB 36: GOSUB 
25 
95 PRINT : GOSUG 76: GOSUB 45: 
GOSUB 25: PRINT : GOSUB 58 
: GOSUB 25: PRINT : GOSUB 55 
: GOSUB 25: PRINT 
108 PRINT : PRINT : GOSUB 7@: INPUT 
'JHEH READY HIT RETURN", BS 
105 GR 
118 BS="ABCDEFGHIJKLMNOP": CALE 
-936 
115 FOR 2=@ 10 15: COLOR=Z: PLOT 
24044 ,99: YIAB 2k: GOSUB 75 
: TAB 24245 PRINT BS(Z#1,2+ 
1)3: GOSUB 73: HEaT 2: TAB 
126 YTAB 22:B$="TYPE A LETTER TO CH 
ANGE COLOR.*: GOSUB 25: PRINT 
¢B$="TYPE SPACE BAR TO STOP PLOT 
."s GOSUB 25: PRINT 
125 Y= PDL (1)#38/255:X= PDE (8 
439/255: YTAB 24: TAB 1: PRINT 
“CURSOR POSITION: X="sXs" Y=" 
tp 3: 
138 IF PEEK (-16984)3127 THEN 145 
: TF Xt=X AND Yi=¥ THEN 125 
: COLOR=C2: PLOT Xi,YI: IF 
NOT FLAG THEN 135: COLOR=C: 
PLOT X,Y 
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139 Ce= SCRMCK,Y):C3=15: IF Ce= 
13 THEN C3=5: COLOR=C3: PLOT 
Re VeRL=Ks Vi=¥ 

148 GOTO 125 

143 IF PEEK (-16384)#168 THEN 155 
:FLAG=@: POKE -16368,6: POKE 
34,28: COLOR=8: HLIN 6,39 AT 
39: CALL -936 

150 PRINT :BS="CONTINUE OR STOP" 
: YIAB 24: GOSUB 25: INPUT 
" (C75) * BS: IF Bi, 1="C" 
THEN 118: PRINT "END*: END 


199 FLAG=1sC= PEEK (-16384)-193 
: POKE -16368,8: GOTO 125 


MASTERMIND PROGRAM 


PROGRAM DESCRIPTION 

MASTERMIND is a game of strategy that matches your wits against Apple's. 

The object of the game is to choose correctly which 5 colored bars have 

been secretly chosen by the computer. Eight different colors are possible 
for each bar - Red (R), Yellow (Y), Violet (V), Orange (0), White (W), and 
Black (B). A color may be used more than once. Guesses for a turn are 

made by selecting a color for each of the five hidden bars. After hitting 
the RETURN key Apple will indicate the correctness of the turn. Each white 
square to the right of your turn indicates a correctly colored and positioned 
bar. Each grey square acknowledges a correctly colored but improperly posi- 
tioned bar. No squares indicate you're way off. 


Test your skill and challenge the Apple II to a game of MASTERMIND. 


REQUIREMENTS 
8K or greater Apple II computer system. 
BASIC is the programming language. 
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PROGRAM LISTING: MASTERMIND 


£ MGCTID: moar 
Fr NaS TERRLHD o7iu7 


238 YoTRYS? MOG 26+: TRYSTRYHL: 3AAH REM CALL -384 SETS INVERSE ¥ID 
aT TRYs: COLOR= BiG REN CLL -388 SET 
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~{6368 PRS Kap feo 


ACB Os Kes "BGR VINE 386 FOR @ALT=i TO LGsKEY= PEEK 3848 RER CALL-936 CLEARS SCREEN AND 


fig TEYT 2 PAPE -8G2:. DBTHT & f.if9Ga%. TE FOYSI9G Ti - mn ounnER Gert 
Ui 2 CALL f332 ERLG baad is ir KBRLELGViGE ff Ges T UPPER LEFT, 


i=] TO 2: iF ENO ne ‘ARROY EEY=136 O08 449 ASCITS 


#E 10 THE GORE OF AASTERNIND! S1ORRCWD=1KEI=149 4616 REM STATS 188-118 ie SETUP 
| _ | 


Beet 
& 
Pat | 
a 
na 
fereots 
th: 
ote 
[i 
ee 


wih; MG TEST TL Th Ors 2252 252% 


YOUR OBJECT 15 TG GHESS 3 COLOR i: IK KEY=i36 AnD 4) | OR 4938 RFE STETS wi aie ‘use INPUT 
5 CeHiEH® Rei=149 AND RAG THEN HERHKE 449 REM STHT 486 
E HI 5-26: MEAT WALTSFLASH-I-FLASH: 495g ER STHTS 58 
HISUR RURBER OF GUESSES. THER GOTO 368 4668 PER SUBR 1888 COLOR LIKE 
CHEE LIbH? GIFFERERT COLORS 19 B CGLGR=L5:H=#: FOR 1=1 TO 3: 4678 BER SURE 2806 KATCH TEST 
CHOSE FROE.* BDeCC ids]: G0GUB 2000: HEXT 
RINT * I: IF #25 THEN 58: COLORS 


: FUR ESL Ge a: FOR I=L 7a 


oofite. 
Ug 
hed Pe] 


COULE Tug F urea’ 
rCLerz tiute € BRL IICLS 
CLiTHT#: BGTHT = F TH & cirecr te 
PLLERI OS PRLE: foGid 3 buesse 788 


§-----G00D"s PRINT * 


reyes cog Bey oot 2 
UESSE5----HYLRRRE GU G07 TT Lk 


ff RnTiit riistii? ¢a 173 a es 2 rE oatett 
se FELT "RURE THAR i4 SUESSES--POG ADS 


& HRD TRyGte THEN PRINT "G00" 


[ AWY KEY TO BEGIN PLAY" "AVERAGE" :: fF mole THEN 


sats it: Bik, - Pry ~i£%3 7. 3 ap 2 T2e sTT Mgt oy 
i68 CALL -388: IF PEER i-16384) 284. TRE 5: PRIET "HIT BBY KEY 
ate mr £225 Pats t tie oS Fr em mae ach rats, = 
idé THER LBS: FREE -ié3oe, ffi PLAY SGSIH": GOT iB 
* . SIs TUT Prk te i 255 $$ Th ii Sir mee Time: 72 
g: GR: PRINT : FOR isi TG i898 IF H=6 THER RETURH : COLOR 


* 'SKCL,003¢ AERT 2088 IF ACLIOD(E) THEN RETURN 
18 TRY=0: PRINT : PRINT © LETTER feels PLOT eee PRIN 


REYS FOR COLOR CHARGE’: PRIRT sACT =#s BC 3-9: RETURN 


*  ARROG RET FOR ABYAHEE AND BR 


cE: PRIRT ®? HIT RETHRR TO HCE 
EPT GUESS #*: 
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BIORHYTHM PROGRAM 


PROGRAM DESCRIPTION 

This program plots three Biorhythm functions: Physical (P), Emotional (E), 
and Mental (M) or intellectual. All three functions are plotted in the 
color graphics display mode. 


Biorhythm theory states that aspects of the mind run in cycles. A brief 
description of the three cycles follows: 


Physical 

The Physical Biorhythm takes 23 days to complete and is an indirect indicator 
of the physical state of the individual. It covers physical well-being, basic 
bodily functions, strength, coordination, and resistance to disease. 


Emotional 
The Emotional Biorhythm takes 28 days to complete. It indirectly indicates 
the level of sensitivity, mental health, mood, and creativity. 


Mental 

The mental cycle takes 33 days to complete and indirectly indicates the level 
of alertness, logic and analytic functions of the individual, and mental recep- 
tivity. 

Biorhythms 

Biorhythms are thought to affect behavior. When they cross a "baseline" the 
functions change phase - become unstable - and this causes Critical Days. These 
days are, according to the theory, our weakest and most vulnerable times. Acci- 
dents, catching colds, and bodily harm may occur on physically critical days. 
Depression, quarrels, and frustration are most likely on emotionally critical 
days. Finally, slowness of the mind, resistance to new situations and unclear 
thinking are likely on mentally critical days. 


REQUIREMENTS 
This program fits into a 4K or greater system. 
BASIC is the programming language used. 
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PROGRAM LISTING: BIORHYTHM 


2 POKE 2,173: POKE 3,48: POKE 
4,192: POKE 5,165: PORE 6,4 
: PORE 7,32: POKE 8,165: PORE 
§,20e: PORE 10,160: PORE ii 
rit PORE iz, 288: POKE 13,4 
18 POXE 14,158: POKE iS,c4: POKE 
6,246: PORE 17,5: PORE i, 
198: PORE 19,1: POKE 26,,%: 
POKE 2i,z: POKE 22,8: PORE 
23,56 
13 GOTO 83 
26 TT=3: GU5UB 38: RETURH 
25 PRINT “seebaecarkeeeeserescaeees 
eacaeeseaceees’: ROTIRH 
33 RRB: TOH=368: O05U8 45: RETURH 


33 KR=8: TOH=208: GOSUB 43: RETURH 


46 RR-G: TGH=258: GOSUR 495ER=9 
sT0H=258: GOSUB 45: RETURN 


43 PORE i, 70H AOD coo: PORE 24 
»GH236+1: FORE 8,KR: CALL 
e: RETURN 

BA f=6 19-0 PSB 1/188) ec Peas 


aie PELRBOUCLD DFS = 


Tyvi0e) 

aa HAH Pel Ga Sect 1 eC 3g-il Ps 
166-3400 1397 1ee8i T/ 1BB DD: 
A=39e( 2359 HAC AL4E: RET URE 


bd KRG: THeS80: GOSUD 78: KE=3: 
TH=250: GOSUE 78: RETUEH 
65 KK=7:THe1@: GOSUB 74: RETURK 


76 POKE 1,TM MOD 256: POKE 24, 
TH/256+1: POKE @,KK: CALL 2 
: RETURH 
75 GOSUB G8: INPUT "DATE (H,D,Y) ° 
MD YsY=¥4(¥(108 91988 
SB ASY-(HCS3:NEY MOD 58#365-¥7 
56e0e+h-4-A/40G+HeSl -H/ 12-47 
7-H/5-34( W240: IF NO THEN 
N=Hte1252: RETURK 
85 DIN NS(1@),B4(3),B(3),C03), 
BY 39:BC 1 =348BC2 e266: Bi 3 
peedee Cc 135752002 7002005 
yB25BYC 1 HSB 2 )=28 
90 B¥(3)=33: TEXT + CALL -936: 
POKE 34,24: GOSUB 26: GOSUB. 
25: GOSUB 28: PRINT : TAB id 
: PRINT "APPLE I] BIORHYTHH (4K) 
": TRB 15: PRINT 
95 GOSUB 25: TAB 5: PRINT "COPYRIGH 
T 1977 APPLE COMPUTER THC." 
: POKE 24,24: YTAB 24 
id GOSUB 68: INPUT "WANE *,NS: 
VIAB 22: PRINT NS: ¥TAB 24 
: PRINT "BIRTH "3: GOSUB 75 
: VIAB 22: TAB 2l: PRINT "BIRTH 
DATE "she" "sie" "7: FIRB 
?4:NisH: CALL -868 
1#5 PRINT "FORECAST "s: GOSUB 75 
sNSH-Hi: IF A<@ THEN NeNtei252 
: VIAB 23: TAB 19: PRINT “FORECA 
ST DATE "sMs*,"sDs","sY: ¥TAB 
#4: CALL -868 
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110 J=is GR: POKE 34,23: FOR X= 
18 10 20: COLOR=3: HLIN 6,31 
AT X: NEXT X: HLIN 1,3 AT 
3: HLIN 1,3 AT 37: VLIW 2,4 
AT 2: VIRB 2d 

115 FOR Y=1 10 31 STEP. 3: PRINT 
Ys: IF YCid THEN PRINT °.*; 
: PRINT ® "ss HEXT Ys PRINT 
" PEW: VIRB 24 

128 YTAB 23: PRINT "DAYS LIVED ° 
cH: FOR I=1 10 3: COLGR=L# 
[=i 464( 1=2)+88( 123): ¥LTH 
8,39 AT 33titis YTAB 24 

125 FOR X=@ TO 31sP=(W MOG BYCT) 
+X) HOD BYCI}: GOSUB 58: PLOT 
¥fiz GOSUB 65: HEXT X: NEXT 
I 


138 PRINT : INPUT "ANOTHER PLOT (Y/H 


) "BS: IF BSC1,2)=°%" THEN 
9@: EXD 


DRAGON MAZE PROGRAM 


PROGRAM DESCRIPTION 

DRAGON MAZE is a game that will test your skill and memory. A maze is 
constructed on the video screen. You watch carefully as it is completed. 
After it is finished the maze is hidden as if the lights were turned out. 
The object of the game is to get out of the maze before the dragon eats 
you. A reddish-brown square indicates your position and a purple square 
represents the dragon's. You move by hitting a letter on the keyboard; 

U for up, D for down, R for right, and L for left. As you advance so 
does the dragon. The scent of humans drives the dragon crazy; when he is 
enraged he breaks through walls to get at you. DRAGON MAZE is not a game 
for the weak at heart. Try it if you dare to attempt out-smarting the 
dragon. 


REQUIREMENTS 
8K or greater Apple II computer system. 
BASIC is the programming language. 


* Color tints may vary depending upon video monitor or television adjustments. 
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PROGRAM LISTING: DRAGON MAZE 


| TEXT : CALL ~936 

2 PRINT "WELCOME TO THE DRAGGH'S K 
fzE" 

3 PRINT "YOU NAY ¥ATCH WHILE I BUI 
LD A MAZE," 

4 PRINT "BUT WHEN IT'S COMPLETE, 1 
"LL ERASE? 

5 PRINT “THE PICTURE. THEN YOU'LL 
GNLY SEE THE WALLS AS YOU BUMP I 
NTO THER. * 

6 PRINT "TO MOVE, YOU HIT 'R' FOR 
RIGHT," 

7 PRINT "'L’ FOR LEFT, ‘Ui FOR UP, 

AND 
8 PRINT ""D' FOR DOWH. DO NOT HIT 
~-RETURHE! 
9 PRINT 


id PRINT “THE OBJECT.1S FOR YOU CTH 


E GREEN DOT* 

A} PRINT “TO GET 10 THE B00R ON ThE 
RIGHT SIDE" 

12 PRINT "BEFORE THE DRAGON. (THE: RE 
b DOT) ERTS® 

13 PRINT °7OU.° 


THE DRAGON" 
i3 PRINT "GETS REAL RD, AND CLIRBS 
GUYER ft WALL. * 
io PRINT "BUT ROST GF THE TIME, HE 
CART GO GYER" 
if PRINT "AND HAS TO GO AROUND. * 


is PRINT 
i9 PRINT “CHINT: YOU CAH OFTEN TELL 
WHERE A WALL* 


28 PRINT °1S, EVEN BEFORE YOU CAN 
EE IT, BY" 

21 PRINT "THE FACT THAT THE DRAGON 
CAN'T GET® 

22 PRINT “THROUGH IT!)* 

23 PRINT 

89 DIN AS3) 

90 PRINT "TYPE ‘a0' TO BEGIN * 
5: INPUT AS 

188 GR + COLOR=15 

185 CALL -936: PRINT "DRAGON MAZE" 
3: TAB (25): PRINT "GARY J. SHAN 
ON" 

118 FOR 1-8 10 39 STEP 3: YLIN 
8,39 AT I: HLIN 6,39 AT I: HEXT 

128 COLORS 

130 S=1080 


1088 DIN W169), 1169) 


100i FOR T=1 10 469:T(1)=@: NEXT 
I 

1@i@ FOR [=i 10 169:8¢1)=fl: NEXT 
I 

i036 X= RMD CA3}+1sY= RND C1341 
0-169 


1835 UF C=1 THEN 1288 


1648 R=8:0=0:L=0:U=O: K=k+13¢( 7-1 
PACK )=- BS CACK)):C=C-1 

1656 IF kel3 THEN 1868:R=H(K+1)> 
8 

i860 IF Y=13 THER 1870:D=WCK+13) 
34 

i878 IF X=1 THEN 1@SO:L=MCK-1)26 


ig8@ IF ¥=1 THEN 1890: U=K(K-13)) 
6 
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1098 G=R+D+L+U 

1898 IF (<3 AND RND (182) OR 
Q=8 THEN 1178 

i118 DR= RND (4) 

1128 GOTO 1138+ideDR 

1138 IF NOT R THEN 1L1GsHCKI=HCK) 
+1 sReKEl 

1135 ¥LIN 3#Y-2,38¥-1 AT 34(X-1) 


1136 GOTO 1635 

140 TF NOT D THEN L110sH(K)=H(K) 
+18z¥e¥+1 

L145 HLIN 38X-2,38K-1 AT 3#(Y-1) 


1146 GOTO 1835 

1150 IF NOT L THEN 1ii@sHCK-1 2K 
K-1)-Lske8-1 

1155 ¥LIN 36¥-2,347-1 AT 3#k 

1156 GOTO 1835 

1160 IF NOT Q THEN L11@:K(K-13) 
HCK-13)-183 Y=¥-1 

i165 HLIN 34%-2,3#K-1 AT 38¥: GOTO 
1835 

L176 X= RMD C13d+is Y= RND (13)+1 


119@ TF ACKti3e(Y-13)76 THER 1178 


1196 C=Cti: GOTO 1035 

i206 GOSUB S800: PRINT “THE HAZE 15 R 
EADY* 

1265 GR: COLOR=i3. 

1216 ¥LIN @,39 AT @: YLIN 6,39 Al 
39: HLIN 6,35 AT @: HLTH 8, 
39 AT 39 


1228 X=i:¥= RMD (i331: COLOR=S: 


PLOT 3#k-2 347-2 


DRAGON MAZE cont. 


1225 HX=3eX-2:HY=3a¥-2 

1230 WY RND (131 

1240 COLOR=@: YLIN 3#WY-2,300¥-1 
AT 39 

1250 Sk=13:S¥=¥i 

1268 Q=38SK-2:0¥=345Y-2 

1278 RD=t 

1560 Ke PEEK (-16384): IF K(128 THEN 
1560 

1518 POKE -16368,0 

1515 QO=K: GOSUB 7860:K=06 

1516 IF Ske¥ AND S¥=? THEN 8008 

1520 IF K= ASC(*R") THEN 2800 

1538 IF Ke ASCC*L") THER 2588 

1540 IF Ke ASCC*U") THEN 3600 

1550 IF k= ASC("D") THEN 3560 

1568 GOSUB 5@d8: GOTO 1500 

2008 DX=L:DY=8 

2016 IF BCKHL3(Y-19) MOD 1@ THEN 
4006 

2026 FX=3eX-2sF¥=de7-2: FOR I=1 10 
3 

OA9G FRSFREDKSFY=F YAY 

2848 COLOR=8 

“e068 FOR K=@ TO i: FOR L=8 10 is 
PLOT HAHK HY#L: NEXT L,ks- COLOR= 
S: FOR K=O TO 1: FOR L=@ 70 
is PLOT FREK,FY+L: NEXT LK: 
HR=FRSHY=FY 

2116 NEXT I 

P15 KEREDN: YoveDY 

2116 IF X=13 AND Y=¥Y THEN 6000 

2128 GOTO 158d 

2508 bH=-1:D¥=0 

2516 IF WCK+L3e(Y-1)-1) MOD 16 THEN 
4108 


2528 GOTO 2620 
3080 DX=0:DY=-1 
3810 IF MCX#13e(¥-2)9718 THEN 4200 


3828 GOTO 2628 
3988 DX=0:DY=1 
SOL TF ACK+13eC¥-1))/18 THEN 4306 


3528 GOTO 2620 

4089 GOSUB 3888 

4618 COLOR=15 

4828 YLIR 3#CY-1),3¢7 AT Jak 
4838 GOTG 1588 

4188 GOSUG 3888 

4118 COLOR=i5 

4120 YIN JeC¥-1),387 AT SeCR-1) 


4138 GOTO 1588 

4208 GOSUB 5080 

4218 COLOR=15 

4200 HLIN 38(K-1),38% AT 34(Y-1) 

$ 

4236 GOTO: 1568 

4368 GOSUB 5680 

4318 COLOR=15 

4320 HLIN 3e(X-1),38% AT 38 

4338 GOTO 1508 

5008 5=S-i: FOR I=1 10 20: f= PEEK 
(-16336)+ PEEK (-16336)+ PEEK 
(-16336)4 PEEK (16336): NEXT 
I: RETURK 

660 PRINT "YOU WIN!" 

6818 GOSUB 5086: GOSUB 5400: GOSUB 
seed 

6028 PRINT "SCORE=":543 

6638 END 
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7080 IF X)SK THEM 7085: IF ¥>SY THEN 
7058 

7001 IF ¥<SK THEN 7160: IF Y<SY THEN 
7156 

7605 IF SX=13 THEN 705@: IF T(5x+ 
134(SY-1)))9 THEN 7010: IF 
M(SK+139(SY-1)) MOD 1@ THEN 
7050 

7618 DX=1:DY=8 

7628 COLOR=8 

7022 RX=365%-2:R¥=3466V-2 

7823 FOR I= TO 3:RK=RX#DX:RY=RY+ 
DY 

7024 COLOR=8 

7025 FOR K=@ 10 i: FOR L=@ TO 1: 
PLOT QX#K,Q¥+L: HEXT L,K: -COLOR= 
RD: FOR K=8 TO i: FOR L=# 10 
is PLOT RX#K,RY#L: HEXT L,K: 
QX=RX:OY=RY 

7038 NEXT I 

7035 SK=SKEDK:SY=SV4DY 

7040 TCSK#L3#C SY-1 JTC SKe1 34( SY- 
Li 

7045 RETURN 

7050 IF S¥=13 THEN 7100: IF T(SK+ 
134(5Y-13939 THEN 7868: IF 
AC SK+134¢57-199718 THEN 7166 


7068 DR=G:DY=t: GOTO 7020 

7108 IF Sk=1° THEN 7150: IF (SX 
134(5Y-1))99 THEN 7116: IF 
MCSKHL38CSY-19-1) OD 16 THEN 
7158 


DRAGON MAZE cont. 


7110 DX=-1:D¥=0: GOTO 7620 

7150 IF S¥={ THEN 7005¢° IF T(SK+ 
134(SY-1)959 THEN 716@: IF 
NCSK#L38(SY-1)-13)/18 THER 
7005 

7160 DX=@:DY=-1: GOTO 7620 

ga0e GOSUB S888: GOSUB Seag: GOSUB 
5a00: GUSUB SGB0: PRINT “THE DRA 

GOH GOT your® 
999° END 
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APPLE II FIRMWARE 


. System Monitor Commands 

. Control and Editing Characters , 

. Special Controls and Features 

. Annotated Monitor and Dis-assembler Listing 
. Binary Floating Point Package 

. Sweet 16 Interpreter Listing 

. 6502 Op Codes 
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System Monitor Commands 


Apple II contains a powerful machine level monitor for use by the advanced 
programmer. To enter the monitor either press RESET button on keyboard or 
CALL-151 (Hex FF65) from Basic. Apple II will respond with an "*" (asterisk) 
prompt character on the TV display. This action will not kill current BASIC 
program which may be re-entered by a C© (control C). NOTE: "adrs" is a 
four digit hexidecimal number and "data" is a two digit hexidecimal number. 
Remember to press "return" button at the end of each line. 


Command Format Example Description 


Examine Memory 


adrs *COF2 Examines (displays) single memory 
location of (adrs) 


adrsl.adrs2 *1924.1948 Examines (displays) range of memory 
from (adrs1) thru (adrs2) 

(return) * (return) Examines (displays) next 8 memory 
locations. 

.adrs2 * 4996 Examines: (displays) memory from current 


location through location (adrs2) 


Change Memory 


adrs:data *A256:EF 20 43 Deposits data into memory starting at 
data data location (adrs). af , 

‘data data *:FO A2 12 Deposits data into memory starting 
ata after (adrs) last used for deposits. 


Move Memory 


adrsl<adrs2. *199<BG19.B41@M Copy the data now in the memory range 
adrs3M from (adrs2) to (adrs3) into memory 
locations starting at (adrs1). 


Verify Memory 


adrsl<adrs2. *199<BO19.B41 BV Verify that block of data in memory 
adrs3V range from (adrs2) to (adrs3) exactly 
matches data block starting at memory 
location (adrsl) and displays 
differences if any. 
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Command Format 


Cassette I/0 
adrsl.adrs2R 


adrsl.adrs2W 


Display 


Dis-assembler 


adrsL 


Mini-assembler 


(Turn-on) 


$(monitor 
command ) 


adrs: (6502 
MNEMONIC 
instruction) 


Example 


*300.4FFR 


*800 . 9FFW 


*] 
*N 


*C800L 


*L 


*F666G 


: $C800L 


'CQ1Q:STA 23FF 
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Description 


Reads cassette data into specified 

memory (adrs) range. Record length 
must be same aS memory range or an 

error will occur. 


Writes onto cassette data from speci- 
fied memory (adrs) range. 


Set inver ideo mode. (Black characters 
on white Background) ° 

Set normal video mode. (White characters 
on black background) 


Decodes 29 instructions starting at 
memory (adrs) into 6592 assembly 
nmenonic code. 


Decodes next 26 instructions starting 
at current memory address. 


Turns-on mini-assembler. Prompt 
character is now a "!" (exclamation 
point). 


Executes any monitor command from mini- 
assembler then returns control to mini- 
assembler. Note that many monitor 
commands change current memory address 
reference so that it is good practice 
to retype desired address reference 
upon return to mini-assembler. 


Assembles a mnemonic 6592 instruction 
into machine codes. If error, machine 
will refuse instruction, sound bell, 
and reprint line with up arrow under 
error. 


Command Format Example 

(space) (6592 ! STA DIFF 
mnemonic 
instruction) 

(TURN-OFF) : (Reset Button) 


Monitor Program Execution and Debugging 


adrsG *300G 
adrsT *800T 
adrs$ *C959S 
(Control E) xl 
(Control Y) xyC 


Note I: 


Description 


Assembles instruction into next 
available memory location. (Note 
Space between "!" and instruction) 


Exits mini-assembler and returns 
to system monitor. 


Runs machine level program starting 
at memory (adrs). 


Traces a program starting at memory 
location (adrs) and continues trace 
until hitting a breakpoint. Break 
occurs on instruction @@ (BRK), and 
returns control to system monitor. 
Opens 6502 status registers (see note 1). 


Single steps through program beginning 
at memory location (adrs}. Type a 
letter S for each additional step 

that you want displayed. Opens 6502 
status registers (see Note 1). 


Displays 6582 status registers and 
opens them for modification (see Note 1). 


Executes user specified machine 
language subroutine starting at 
memory location (3F8). 


6502 status registers are open if they are last line displayed on screen. 
To change them type ":" then "data" for each register. 


Changes A register only 


Example: A= 3C X= FF Y= @6 P= 32 S = F2 
*; FF 
*:FF $6 33 Changes A, 


X, and Y registers 


To change S register, you must first retype data for A, X, Y and P. 


Hexidecimal Arithmetic 


datal+data2 *78+34 


datal-data2 *AE-34 
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Performs hexidecimal sum of datal 
plus data2. 


Performs hexidecimal difference of 
datal minus data2. 


Command Format Example 


Set Input/Output Ports 
(X) (Control P) *5pC 


(xX) (Control K) *2KC 


Note 2: 


Description 


Sets printer output to 1/0 slot 
number (X). (see Note 2 below) 


Sets keyboard input to I/0-slot 
number (X). (see Note 2 below) 


Only slots 1 through 7 are addressable in this mode. Address @ (Ex: gpC 


or JK 


) resets ports to internal video display and keyboard. These commands 


will not work unless Apple II interfaces are plugged into specificed I/0 


slot. 


Multiple Commands 


*1Q9QL 499G AFFT 


*LLLL 
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Multiple monitor commands may be 
given on same line if separated by 
a "space". 


Single letter commands may be 
repeated without spaces. 


SPECIAL CONTROL AND EDITING CHARACTERS 


"Control" characters are indicated by a super-scripted "C" such as G°. They 
are obtained by holding down the CTRL key while typing the specified letter. 
Control characters are NOT displaved on the TV screen. B~ and C” must be 
followed by a carriage return. Screen editing characters are indicated by a 
sub-scripted "E" such as De. They are obtained by pressing and releasing the 
ESC key then typing specified letter. Edit characters send information only 
to display screen and does not send data to memory. For example, UC moves to 
cursor to right and copies text while Ag moves cursor to right but does not 
copy text. 


CHARACTER DESCRIPTION OF ACTION 
RESET key Immediately interrupts any program execution and resets 


computer. Also sets all text mode with scrolling window 
at maximum. Control is transfered to System Monitor and 
Apple prompts with a "*" (asterisk) and a bell. Hitting 
RESET key does NOT destroy existing BASIC or machine 
language program. 


Control B If in System Monitor (as indicated by a "*"), a control 
B and a carriage return will transfer control to BASIC, 
scratching (killing) any existing BASIC program and set 
HIMEM: to maximum installed user memory and LOMEM: 
to 2048. 


Control C If in BASIC, halts program and displays line number 
where stop occurred*. Program may becontinued witha | 
CON command. If in System Monitor, (as indicated by "*"), 
control C and a carraige return will enter BASIC without 
killing current program. 


Control G Sounds bell (beeps speaker) 


Control H Backspaces cursor and deletes any overwritten characters 
. from computer but not from screen. Apply supplied 
keyboards have special key "<" on right side of keyboard 
that provides this functions without using control button. 


Control J Issues line feed only 


Control V Compliment to Ho. Forward spaces cursor and copies over 
written characters. Apple keyboards have ">" key on 


right side which also performs this function. 
Control X Immediately deletes current line. 


* If BASIC program is expecting keyboard input, you will] have 
to hit carriage return key after typing control C. 


72 


SPECIAL CONTROL AND EDITING CHARACTERS 


(continued) 


CHARACTER DESCRIPTION OF ACTION 


Move cursor to right 


E 
Be Move cursor to left 
Ce Move cursor down 
De Move cursor up 
E- Clear text from cursor to end of line 
Fe Clear text from cursor to end of page 
@, Home cursor to top of page, clear text to end 


of page. 
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Special Controls and Features 


Hex 


BASIC Example 


Display Mode Controls 


C950 
C951 
CH52 
CQ53 
Cp54 


Cp55 
C956 
C957 


POKE 
POKE 
POKE 
POKE 
POKE 


POKE 
POKE 
POKE 


TEXT Mode Controls 
99 POKE 32,L] 


9929 


9921 


$922 


9923 


Pp24 


9925 


9932 


FC58 
FC42 


-16394,9 
- 16393 ,9 
- 16392 ,9 
-16391 59 
- 16399 9 


-16299,9 
-16298.p 
-16297 .p 


19 POKE 33,W1 


119 POKE 34,T1 


128 POKE 35,B1 


139 CH=PEEK(36) 
149 POKE 36,CH 
159 TAB(CH+1) 


169 CV=PEEK(37) 
17 POKE 37,CV 
189 VTAB(CV+1) 


199 POKE 
299 POKE 


219 CALL 
229 CALL 


59,127 
59,255 


-936 
-958 


Description 


Set color graphics mode 

Set text mode 

Clear mixed graphics 

Set mixed graphics (4 lines text) 

Clear display Page 2 (BASIC commands 
use Page 1 only) 

Set display to Page 2 (alternate) 

Clear HIRES graphics mode 

Set HIRES graphics mode 


Set left side of scrolling window 
to location specified by LI] in 
range of @ to 39. 


Set window width to amount specified 
by Wl. LI+W1<49. W1>9 


Set window top to line specified 
by Tl in range of @ to 23 


Set window bottom to line specified 
by B?l in the range of @ to 23. BI>TI 


Read/set cusor horizontal position 

in the range of 9 to 39. If using 

TAB, you must add "1" to cusor position 
read value; Ex. 140 and 150 perform 
identical function. 


Similar to above. Read/set cusor 
vertical position in the range 9 to 
23. 


Set: inverse flag if 127 (Ex. 199) 
Set normal flag if 255(Ex. 299) 


(@r) Home cusor, clear screen 


(Fe) Clear from cusor to end of page 


TA 


Hex BASIC Example 
FC9C 239 CALL -868 
FC66 249 CALL -922 
FC7P 258 CALL -912 
Miscellaneous 
CO39 36 X=PEEK(-16336) 
365 POKE -16336,9 
Cppp 379 X=PEEK(-16384 
CP19 389 POKE -16368,0 
C961 399 X=PEEK(16287) 
CH62 499 X=PEEK(-16286) 
C963 419 X=PEEK(-16285 
C958 429 POKE -16296,9 
Cp59 439 POKE -16295,9 
CP5A 449 POKE -16294,9 
CO5B 459 POKE -16293,9 
CA5C 469 POKE -16292,9 
CP5D 47H POKE -16291,9 
CO5E 489 POKE -16290,9 
CO5F 499 POKE -16289°,9 


Description 
(Ee) Clear from cusor to end of line 


(9°) Line feed 


Scroll up text one line 


Toggle speaker 
Read keyboard; if X>127 then key was 
pressed. 


Clear keyboard strobe - always after 
reading keyboard. 


Read PDL(®) push button switch. If 
X>127 then switch is “on". 


Read PDL(1) push button switch. 
Read PDL(2) push button switch. 
Clear Game I/0 AN®# output 

Set Game I/0 AN output 

Clear Game I/0 ANI output 

Set Game 1/0 AN] output 

Clear Game I/0 AN2 output 

Set Game I/0 AN2 output 

Clear Game I/0 AN3 output 

Set Game I/0 AN3 output 
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APPLE II 
SYSTEM MONITOR 


COPYRIGHT 1977 BY 
APPLE COMPUTER, INC. 


ALL RIGHTS RESERVED 


S. WOZNIAK 
A. BAUM 


eet © eee Hee ee DD 
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* 
a 
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KEKKRHAHARKHEREKKEKAERERERS 
TITLE “APPLE II SYSTEM MONITGR" 

LOCO EezZ $00 

LOC1 EPZ $01 

WNDLFT EPZ $20 

WNOWDTH EPZ $21 

WNDTOP EPZ $22 


WNDBTM EPZ $23 


CH EPZ $24 
CV EP2 $25 
GBASL EPZ $26 
GBASH EPZ $27 
BASL EPZ $28 
BASH EPZ $29 
BAS 2L EPZ $2A 
BAS2H EPZ $28 
H2 EPZ $2C 
‘LMNEM EPZ $2C 
RTNL EPZ $2C 
v2 EPZ $20 
RMNEM EPZ $2D. 
RTNH EPZ $20 
MASK EPZ $2F 


CHKSUM EPZ S2F 
FORMAT EPZ $2E 
LASTIN EPZ $2F 
LENGTH EPZ S2F 


SIGN EPZ $2F 
COLOR EPZ $30 
MODE EPZ $31 


INVFLG EPZ $32 
PROMPT EPZ $33 


YSAV EPZ $34 
YSAV1 EPZ $35 
CSWL EPZ $36 
CSWH EPZ $37 
KSWL EPZ $38 
KSWH EPZ $39 
PCL EPZ $3A 
PCH EPZ $38 
XOT EPZ $3C 
AlL EPZ $3C 
A1H EPZ $3D 
A2L EPZ S3E 
A2H FP2 $3F 
A3L EPZ $40 
A3H EPZ $41 
A4L FPZ $42 
A4H EPZ $43 
ASL EPZ $44 
ASH EP2 $45 
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F800: 
F801: 
F802: 
F805: 
F806: 
F808: 


F8OA: . 


F80Cs: 
F8SOE: 
F810: 
F812: 
F814: 
F816: 
F818: 
F819: 
F81C: 
F81E: 
F820: 
F821: 
F824s3 
F826: 
F828: 
F829: 
F82C: 
F82D: 
FB2F: 
F831: 
F832: 
F834: 
F836: 
F838: 


F83A: 
F83C: 
F8&3E: 
F8403: 
F843: 
F844: 
F846: 
F847: 
F848: 
F8493 
F84B: 
F84D: 
FE4Fs 
F850: 
F852: 
F&54: 
F856: 


F& 


F8 


F& 


ACC 
XPEG 
YREG 
STATUS 
SPNT 
RNDL 
RNDH 
ACL 
ACH 
XTNOL 
XTnNe! 
AUXL 


IN 
USHRADR 
WT 
IF OLOC 
ICADR 
K8D 


K3CSTRR 
TAPFOUT 


SPKR 
TXTCLR 
TATSET 
MIXCLR 
MIXSET 
LOWSCR 
HISCR 
LORES 
HIRES 
TAPEIN 
PADOILO 
PTRIG 
BASIC 
BASIC2 


PLOT 


RTMAS* 
PLOT] 


HLINE 
HLINE1 


VLINEZ 
VLINE 


R'S1 
CLRSCEK 


CLRTOP 
CLRSC2 
* 


CLFSC3 


GBASCALC 


GBCALC 


EPZ 
E PZ 
EPZ 
EPZ 
FOZ 
EP2 
EP2 
EP2 
FP? 
EPZ 
FOZ 
EPZ 
ED? 
EP2 
EOU 
EQU 
ENU 
EQU 
EQU 
EQU 
EU 
ECU 
EQU 
EQU 
EGU 
EQU 
ECU 
EQU 
S9OU 
EQU 
EQU 
EGU 
EOU 
EOU 
EQU 
FOU 
ORG 
LSR 
PHP 
JSR 
PLP 
LDA 
BCC 
ADC 
STA 
LDA 
EOR 
AND 
EOR 
STA 
RTS 
JSR 
CPY 
BCS 
INY 
JSR 
8CC 
ADC 
PHA 
JSR 
PLA 
CMP 
BCC 
RTS 
LDY 
PNE 
LDY 
STY 
FOR 
LDY 
LDA 
STA 
JSR 
DEY 
SPL 
RTS 
PHA 
ISR 
AND 
OPA 
STA 
PLA 
ANN 
Scc 
ADC 
STA 


$45 
$46 
$47 
$48 
$49 
S4F 
S4F 
$59 
$5) 
$52 
$53 
$54 
$55 
$95 
$6200 
$0368 
SO3FB 
SU3FF 
$CC00 
$c 900 
$C010 
$C020 
$c030 
$C050 
$c051 
$C052 
$C053 
$C054 
$C055 
$C 056 
$C057 
$C060 
$C064 
$C070 
SF000 
$E003 
SF8N0 
A 


GBASCALC CALC BASE ADR IN GBASL,# 
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ROM START ANDRESS 
Y-COORD/ 2 
SAVE LSS IN CARRY 


RESTORE LSB FROM CARRY 


#SOF MASK SOF IF EVEN 
RTMASK 
#SE0 MASK $FO IF ODD 
MASK 
(GBASL) ,£ DATA 
COLOR XOR COLOP 
MASK ANT) MASK 
(GRASL) ,Y XOR DATA 
(GBASL) ,Y TO DATA 
PLOT PLOT SQUARE 
H2 DONE? 
RTS1 YES, RETURN 

NO, INCR INDEX (X-COORD) 
PLOT 1 PLOT NEXT SOUARE 
HLINE] ALWAYS TAKEN 
#S0O1 NEXT Y-COORD 

SAVE ON STACK 
PLOT PLOT SQUARE 
V2 DONE? 
VLINEZ NO, LOOP. 
#S2F MAX Y, FULL SCRN CLR 
CLRSC2 ALWAYS ‘TAKEN 
#$27 MAX Y, TOP SCRN CLR 
V2 STORE AS ROTTO™ COCRND 
VLINE CALLS 
#$27 RIGKTYCST X=-CUORD (COLUMN 
#$0 TOP CUOPD FOR VLINE CALLS 
COLOR CLFA® COLOR (BLACK) 
VLINE CRAW VLINE 

NEXT LEFTMOST X¥-COORD 
CLRSC3 LOOP UNTIL NONE. 

FOR INPUT NOODEFSH 
A 
#$03 
#$04 GENERALE GRASH#O0NCCOLEFG 
GOASH 

AND GRASLSHDEDEVOO 
#318 
CacALc 
#S7F 
GRASL 


) 


F858: 
F859: 
F8SA: 
F85C: 
F8SE: 
FESFs: 
F861: 
F862: 
F864: 
F866: 
FEOEs 
F869: 
F86A: 
F86B: 
F86C: 
F86Es 
F870: 
F871: 
F872: 
F873: 
F876: 
F878: 
F879: 
F873: 
F87C: 
F387D: 
F87E: 
FS7F: 
FBels: 
F882: 
F&84: 
F&R6: 
F889: 
FEBC: 
F88E: 
FS8Fs 
FB9U: 
F892: 
Fb93: 
F695: 
E8973 
F899: 
FBG3: 
F&9C: 
F89D: 
FB8AQ0: 
FRA3: 
F&ASs 
FRAT: 
F8AY9s 
FOAA: 
FBAND: 
FRAF: 


F8B1: 
FE8b3: 
F834: 
FS8B6: 
F887: 
F8BE: 
F8SBAs: 
F8BCs 
F8BE: 
F8SBF: 
F8C1l: 
F8C2s 
F8C3: 
F8C5: 
F8C6: 
F8C8: 


F8C9: . 


FSCA: 
F8CC: 
F8CD: 
F8BDO: 
F8D3: 
F8D4: 
F8D6: 
F8D9: 
FSDB: 
F8DE: 
F8E0O: 
FSE1: 
F8E3:3 
FSES: 


on” 


19 


Ao 
2E 


F8 


FL 
F9 


FS 
Fé 


F9 


FF 
F8 


FD 
F9 


NXTCOL 


Se TCOL 


SCEN 


SCRN2 


RTMSKZS 


INSOS1 


INSOS2 


TEVE 


ERP 


GETeMT 


MNNDX1 


MNNDX2 


MNNDX3 


INSTDSP 
PRNTOP 


PRNTBL 


ASL 
ASE 
ORA 
STA 
RTS 
ILDA 
CLC 
ANRC 
ANC 
STA 
ASI, 
ASL 
ASL 
ASL 
ORA 
STA 
RTS 
LSR 
PLP 
JSR 
LDA 
PLP 
RCC 
LSR 
LSR 
LSR 
LER 
AND 
RTS 
LDX 
LDY 
JSP 
JSR 
LOA 
TAY 
LSR 
BCC 
ROR 
BCS 
CMP 
BRO 
ANG 
LS& 
TAX 
LDA 
JSR 
aNke 
LCY 
LDA 
TAX 
LOA 
STA 
AND 


STA 
TYA 
AND 
TAX 
TYA 
LDY 
CPX 
BEQ 
LSR 
BCC 
LSR 
LSP 


ORA 
DEY 
BNE 
INY 
DEY 
BNE 
RTS 
DFB 
JSR 
PHA 
LDA 
JSR 
LDX 
JSR 
CPY 
INY 
BCC 
LDX 
CPY 


A 
A 
GBASL 
GRASL 


COLOR 


4$03 
#S0f° 
CILOR 
A 

A 

A 

A 
COLOR 
COLOR 


nA 


GEASCALC 
(GEASL) ,Y¥ 


INCPEMENT COLOR 3Y 3 


SETS COLOR#17*A MOD 16 


POTH YALE PYTES OF COLOP EQUAL 


SCREEN Y=-COORD/2 
LSB (CAFRY). 
CALC BASF ANDRESS 

GET RYTE 
RESTORE LSF 


READ 
SAVE 


FROM CARRY 


RVESKZ IF EVEN, USeE LO H 
4 
4 | 
A SHIPT HIG SALE BYTE DOWN 
A 
#SOF MASK 4-R817S 
PCL PRINT PCI. ,f: 
PCF 
PRYX2 
PROLNK FOLLOWED 3Y A BLANK 
(FCL,%) C&T OP COPP 
A FVOV/OND TEST 
IBVEt 
A RIT 1 TEST 
SRP KRY¥XXXNXLL INVALID OF 
¢ SANZ 
HER OPCUDE $59 INVALID 
#S67 “SAS#® CITS 
A FSR INTO CARFY FOR L/P ‘TEST 
FeT1,X SET PORDAT [NNEX BYTE 
SCRN2 P/L Henyre ON CARRY 
GET Fist 
gO38¢ SUPSTITUTE $K8O FOR INVALID OPS 
4#$0 SFT PRINT FOPYAT INDEX TO 0 
FMT2,X INCEX INTO PRINT FORMAT TASLF 
FOR“AT SAVE FOR ADR FIELD FORMATTING 
#$03 MAS“ FOR 2=-BIT LENGTH 
(P=] RYTE, 1l#2 BYTE, 223 BYTE) 
LENGTH 
CPCOCE 
#S8F MASK FOR 1XXX1010 TEST 
SAVF IT 
OPCODNE TO A AGAIN 
$03 
&S8A 
MNMNOX3 
A 
MNNDX3 FORM INDEX INTO MNEMONIC TABLE 
A 
A 1) 1XXX1010=>00101XXX 
#$20 2) XXXYYYO1=#>00111XXX 
3) XXXYYY10=>00110XXX 
MNNDX2 4?) XXXYY1002>00100XXX 
5) XXXXX000=>000XXXXX 
MNNDX1 
SFF,SFF,SFF 
INSDS1 GEN FMT, LEN BYTES 
SAVE MNEMONIC TABLE INDEX 
(PCL) ,Y 
PRBYTF, 
#$01 PRINT 2 BLANKS 
PRBL2 
LENGTH PRINT INST (1-3 BYTES) 
IN A 12 CHR FIELD 
PRNTOP 
ea CHAR COUNT FOR MNEMONIC PRINT 
#$04 
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FSE7: 
F8E9: 
FBEA: 
FSEB: 
FSEE: 
FSFO: 
FSF3: 
FSF5: 
FSF7: 
FOF9: 
FSFB: 
F8SFD: 
PSFE: 
FSFF: 
F901: 
F903: 
F906: 
F907: 
F909: 
F90C: 
FOOE: 
F910: 
F912: 
F914: 
F916: 
F918; 
F91B: 
FOIE: 
F921: 
F923: 
F926: 
F927: 
F929: 
FP92A: 
F92B: 
F92D: 
F930: 
F932: 
F934: 
F936: 
F938: 
F93B: 
F93C: 
F93D: 
FO3F: 
F940: 
F941: 
F944: 
F945; 
F94B: 
F94A: 
F94C: 
FO4F: 
F950: 
F952: 
F953: 
F954: 
F956: 
F958: 
F959: 
F95B: 
F9S5C: 
FOSE: 
F960: 
F961: 


F962: 


F965s - 


F967: 
F96A: 
F96C: 
FO6F: 
F971; 
F974: 
F976: 
F979: 
F97B: 
FOTE: 
F980: 
F983: 
F985: 
F988: 


01 


DA 
DA 
03 
AO 
ED 
F8 
2F 
3B 
01 


3A 
01 


F9 


FA 


FD 


F9 


FD 
F9 


FD 


F9 


FD 
FD 


FD 


54 
90 
OD 
20 
04 
38 
00 
c8 


PRMN1 


PRMN2 


PRADR1 


PRADR2 


PRADR3 


a 


PRADR4 


PRADR5 


RELADR 


PRNTYX 


PRNTAX 
PRNTX 


PRBLNK 
PRBL2 
PRBL3 


PCADJ 
PCADJ2 
PCADJ3 


PCADJ 4 


RTS 2 


% 


* te & 


PMT 1 


719 


BCC PRNTBL 
PLA RECOVER MNEMONIC INDEX 
TAY 
LDA MNEML,Y | 
STA LMNEM FETCH 3-CHAR MNEMONIC 
LDA MNEMR,Y (PACKED IN 2-BYTES) 
STA RMNEM 
LDA #$00 
LDY #S05 
ASL RMNEM SHIFT 5 BITS OF 
ROL LMNEM CHARACTER INTO A 
ROL A (CLEARS CARRY) 
DEY 
BNE PRMN2 
ADC &SBF ADD “?" OFFSET 
JSR cour OUTPUT A CHAR OF MNEM 
DEX 
BNE PRMN1 
JSR PRBLNK OUTPUT 3 BLANKS 
LDY LENGTH | 
LDX #$06 CNT FOR 6 FORMAT BITS 
CPX #$03 
BEO PRADR5 + IF X=3 THEN ADDR. 
ASL FORMAT 
BCC PRADR3 
LDA CHAR1-1,X 
JSR COUT 
LDA CHAR2-1,X 
BEQ PRADR3 
JSR COUT 
DEX 
BNE PRADRI 
RTS 
DEY 
BMI PRADR2 
JSR PRRYTE 
LDA FORMAT 
CMP #SE8 HANDLE REL ADR MODE 
LDA (PCL),Y SPECIAL (PRINT TARGET, 
BCC PRADR4 NOT OFFSET) 
JSR PCADJ3 
TAX PCL, PCH+OFFSET+1 TO A,Y 
INX 
BNE PRNTYX +1 TO Y,X 
INY 
TYA 
JSR PRBYTE OUTPUT TARGET ADR 
TXA OF BRANCH AND RETURN 
JMP PRBYTE 
LDX #$03 BLANK COUNT 
LDA #SA0 LOAD A SPACE 
JSR COUT UCTPUT A BLANK 
DEX 
BNE PRBL2 LOOP UNTIL COUNT#=0 
RTS 
SEC 0=1-BYTE,1=2-BYTE, 
LDA LENGTH 2=3-BYTE 
LDY PCH 
TAX TEST DISPLACEMENT SIGN 
BPL PCADJ4 (FOR REL BRANCH) 
DEY EXTEND NEG BY DECR PCH 
ADC PCL 
BCC RTS2 PCL+LENGTH(OR DISPL)+1 TO A 
INY CARRY INTO Y (PCH) 
RTS 
FMT1 BYTES: XXXXXXYO INSTRS 
IF Y=0 THEN LEFT HALF BYTE 
IF Y=] THEN RIGHT HALF BYTE 
(X# INDEX) 
DFB $04,$20,$54,$30,$0D 
DFB $80,$04,$90,$03,$22 
DFB $54,$33,$0D,$80,$04 
DFB $90,$04,$20,$54,$33 
DFR S$0D,$80,$"4,$90,$04 
DFB $20,$54,$38,$0D,$80 
“DFB $04,$90,$00,$22,$44 
DFB $33,$0D,$C8,$44,$00 


F9B8A: 11 22 44 


F98D: 33 OD DFB $11,$22,$44,$33,$0D 
FO9SF: C8 44 A9 
F992: 01 22 DFB $C8,$44,$A9,$01,$22 
F994: 44 33 -0D 
F997: 80 04 DFB $44,$33,$0D,$80,$04 
F999: 90 01 22 
F99C: 44 33 DFB $90,$01,$22,$844,$33 
FOOSE: OD 80 04 
F9A1: 90 DFB $0D,$80,$04,$90 
F9A2: 26 31 87 
F9A5: 9A DFB $26,$31,$€7,S9A ZZXXXY01 INSTR'S 
F9A6: 00 FMT2 DFB $00 ERR 
FOA7: 21 DFB $21 IMM 
F9A8: 81 DFB $8] Z-PAGE 
F9A9: 82 DFR $82 ABS 
F9AA: 00 DFB $00 IMPLIED 
F9AB: 00 DFB $00 ACCUMULATOR 
FO9AC: 59 DFB $59 (ZPAG,X) 
F9AD: 4D DFB S$4D (ZPAG) ,Y 
FOAE: 91 DFB $91 ZPAG,X 
FOAF: 92 DFB $92 A38S ,X 
FOBO: 8€ DFB $86 ABS ,Y 
FOB1: 4A DFB S$4A (ABS) 
F9B2: 85 DFB $85 ZPAG,Y 
F9B3: 9D | DFB $9D RELATIVE 
F9B4: AC AY AC 
A3 AS A4 

CHARI ASC ",),#($" 
F9BA: D9 00 D8. 
FOBD: A4 A4 00 CHAR2 DFB $D9,$00,$D8,$A4,$A4,$00 

*CHAR2: "y",0,"XSS",0 

* MNEML IS OF FORM: 

* (A) XXXXx000 

* (B) xXXxYY100 

* (C) 1xxx1010 

* (D) XXxyyylo 

* (E) xXXxyyyY0l 

* (X# INDEX) 
F9CO: 1C 8A 1C 
F9C3: 23 5D 8B MNEML DFB $1C,S$8A,$1C,$23,$5D,$88 
F9C6: 1B Al 9D 
F9C9: 8A 1D 23 DFB $1B,$A1,$9D,$84,$1D,$23 
F9CC: 9D 8B 1D 
FOCF: Al 00 29 DFB $9D,$88,$1D,$Al1,$00,$29 
F9D2: 19 AE 69 
F9D5: A8 19 23 DFB $19,SAE,$69,SA8,$19,$23 
F9D8: 24 53 1B 
FODB: 23 24 53 DFB $24,$53,$1B,$23,$24,$53 
FODE: 19 Al DFR $19,$Al (A) FORMAT ABOVE 
F9EO: 00 1A 5B 
F9E3: 5B AS 69 DFB $00,$1A,$5B,$5B,$A5,$69 
F9E6: 24 24 DFB $24,$24 (B) FORMAT 
F9E8: AE AE A8 
FOEB: AD 29 00 DFR SAE,SAE,$A8,$AD,$29,$00 
F9EE: 7C 00 DFB $7C,$00 (C) FORMAT 
FO9FO: 15 9C 6D 
FOF3: 9C AS 69 DFB $15,$9C,$6D,$9C,$A5,$69 
FOF6: 29 53 DFE $29,853 (D) FORMAT 
FOF8: 84 13 34 
FOFB: 11 AS 69 DFB $84,$13,$34,$11,$A5,$69 
FOFE: 23 AO DFB $23,$SA0 (E) FORMAT 
FAOO: D8 62 5A 
FA03: 48 26 62 MNEMR DFB $D8,$62,$5A,$48,$26,$62 
FA06: 94 88 54 
FAO9: 44 C8 54 DFR $94,$88,$54,$44,$C8,$54 
FAOC: 68 44 E8 
FAOF: 94 00 B4 DFE $68,$44,SE8,$94,$00,$B4 
FAl12: 08 84 74 
FA1S: B4 28 6E DFB $08,$84,$74,$B4,$28,$6E 
FA18: 74 F4 CC 
PAIB: 4A 72 F2 DFB $74,$F4,$CC,$4A,$72,$F2 
PAl1E: A4 8A DFB $A4,S8A (A) FORMAT 
FA20: 00 AA A2 
FA23: A2 74 74 DFB $00,SAA,SA2,$A2,$74,$74 
FA26: 74 72 DFB $74,$72 (B) FORMAT 
FA28: 44 68 B82 
FA2B: 32 B2 00 DFB $44,868,$B82,$32,$B2,S00 
FA2E: 22 00 DF8 $22,$00 (C) FORMAT 
FA30: 1A 1A 26 
FA33: 26 72 72 DFB S$1A,S$1A,3276,$26,$72,$72 
FA36: 88 C8 DFB $86,$C8 (D) FORMAT 
FA38: C4 CA 26 
FA3B: 48 44 44 DFB $C4,$CA,$26,$46,$44,$44 
FA3E: A2 C8 DFB SA2,$C8 (E) FORMAT 
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FF FF 
DO F8 STEP 


2c 


02 


3A 


3A 
3B 
3A 
F3 
2D 


2c 


8E 
45 
40 


FR XQINIT 


00 


? FF 


00 


03 
FF 


F8 
FA 
FF 


F9 


F9 


FD 


xQl 
XQ2 


IRQ 


BREAK 


XBRK 


XRTI 


XRTS 


PCINC2 
PCINC3 


XJSR 


XJMP 
XJMPAT 


NEWPCL 
RTNJMP 


REGDSP 
RGDSP1 


OFB 
JSR 
PLA 
STA 
PLA 
STA 
LDX 
LDA 
STA 
DEX 
BNE 
LDA 
BEO 
LDY 
CMP 
REO 
CMP 
BEQ 
CMP 
SEQ 
CMP 
BEQ 
CMP 
3EQ 
AND 
EOR 
CMP 
BEQ 
LDA 
STA 
DEY 
BPL 
JSR 
JMP 
STA 
PLA 
PHA 
ASL 
ASL 
ASL 
BMI 
JMP 
PLP 
JSR 
PLA 
STA 
PLA 
STA 
JSR 
JSR 
JMP 
CLC 
PLA 
STA 
PLA 
STA 
PLA 
STA 
LDA 
JSR 
STY 
CLC 
BCC 
CLC 
JSR 
TAX 
TYA 
PHA 

TXA 
PHA 

LDY 

CLC 

LDA 

TAX 

DEY 

LDA 

STX 

STA 

BCS 

LDA 

PHA 

LDA 
PHA 

JSR 

LDA 

STA 


SFF,SFF,SFF 
INSTDSP DISASSEMBLE ONE INST 


RTNL 


RTNH 
#S08 


-AT (PCL,&) 


ADJUST TO USER 
STACK. SAVE 
RTN ADR. 


INITSL=-1,X INIT XEO AREA 


XOT,X 
XOINIT 


(PCL,X) 


XBRK 
LENGTH 
#$20 
4JSR 
$$60 
XRTS 
#S4C 
AJ™P 
#$6C 
XJMEAT 
#$40 
XRTI 
4S1P 
#$14 
#$04 
XQ2 


(PCL) ,Y¥ 
XQTNZ,Y 


xQl 


RESTORE 


XQTNZ 
ACC 


A 
A 
A 
BREAK 


(IRQLOC) 


SAV1 
PCL 


PCH 
INSDS1 
RGDSP1 
MON 


STATUS 
PCL 
PCH 
LENGTH 
PCADJ3 
PCH 
NEWPCL 


PCADJ2 


#$02 


(PCL) ,Y 


(PCL) ,¥ 


PCH 
PCL 
XJMP 
RTNH 


RTNL 


CROUT 


#ACC 
A3L 
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USER OPCODE BYTE 
SPECIAL IF BRFAK 
LEN FROM DISASSEMBLY 


HANDLE JSR, PTS, JMP, 
JMP ( ), RTI SPECIAL 


COPY USER INST TO XEO AREA 
WITH TRAILING NOPS 
CHANGE REL BRANCH 
DISP TO 4 FOR 
JMP TO BRANCH OR 
NBRANCH FROM XEQ. 
RESTORE USER REG CONTENTS. 
XEQ USER OP FROM RAM 
(RETURN TO NBRANCH) 


**ITRQ HANDLER 


TEST FOR BREAK 
USER ROUTINE VECTOR IN RAM 


SAVE REG'S ON SREAK 
INCLUDING PC 


PRINT USER PC. 
AND REG'S 
GO TO MONITOR 


SIMULATE RTI BY EXPECTING 


STATUS FROM STACK, THEN RTS 


RTS SIMULATION 
EXTRACT PC FROM STACK 


AND UPDATE PC BY 1 (LEN#=0) 
UPDATE PC BY LEN 


(PDATE PC AND PUSH 
ONTO STACK FOR 
JSR SIMULATE 


LOAD PC FOR JMP, 
(J“P) SIMULATE. 


DISPLAY USER REG 
CONTENTS WITH 
LABELS 


FADE: 
FAEO: 
FAE2: 
FAE4: 
PAE6: 
FAE9: 
FAEC: 
FAEF: 
FAF1: 
FAF4: 
FAF6: 
FAFS: 
FAPA: 
PAFC: 
FAFD: 
FAFE: 
FBOO: 
FPBO2: 
FBOS: 
FBO7: 
FBOS8: 
FBO9: 
FBOB: 
FBOE: 
FBOF: 
FBll: 
FB12: 
FB133 
FB16: 
FB19: 
FBIA: 
FB1B: 
FBIC: 
FB1D: 
FBIE: 
FB21: 
FB23: 
FB24: 
FB25: 
FB28: 
FB2A: 
FB2B: 
FB2D: 
FB2E: 
FB2F: 
FB31: 
FB33: 
FB36: 
FB39: 
FB3C: 
FB3E: 
FB40: 
FB43: 
FB46: 
FB49: 
FB4B: 
FB4D: 
FB4F: 
FB51: 
FB53:3 
FB55:3 
FB57: 
FB59: 
FBSB: 
FBSD: 
FB60: 
FB63: 
FB65: 
FB67: 
FB68: 


FB6A: - 


FB6B: 
FB6D: 
FB6F: 
FB71: 
FB73: 
FB74: 
FB76: 
FE78: 
FB79: 
FB7A: 
FER7B: 
FB7Ds 
FB7E: 
FG80: 


OB 
FD 


Fe 
E5 


FD 
FA 
FD 
FD 


FD 


F9 
FF 


FB 
FA 


co 


co 


co 
CO 
co 


co 
co 
F8 


FC 
FR 


RDSP1 


BRANCH 


NBRNCH 


INITBL 


RTBL 


PREAD 


PREAD2 


RTS2D 
INIT 


SETTXT 


SETGR 


SETWND 


TABV 
MULPI4 


MUL 
MUL2 


MUL3 


MUL4 
MUL5 


LDA 


STA 
LDX 
LDA 
JSR 
LDA 
JSR 
LDA 
JSR 
LDA 
JSR 
INX 
BMI 
RTS 
CLC 
LDY 
LDA 
JSR 
STA 
TYA 
SEC 
BCS 
JSR 
SEC 
RCS 
NOP 
NOP 
JMP 
JMP 
DFB 
DFB 
DFB 
DFB 
DFB 
LDA 
LDY 
NOP 
NOP 
LDA 
BPL 
INY 
BNE 
DEY 
RTS 
LDA 
STA 
LDA 
LDA 
LDA 
LDA 


-BEQ 


LDA 
LDA 
JSR 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JMP 
JSR 
LDY 
LDA 
LSR 
eCcC 
CLC 
LDX 
LDA 
ADC 
STA 
INX 
BNE. 
LOX 
DFB 
DFR 
DEX 
8PL 
REY 
BNE 
RTS 


#ACC/256 
A3H 


#SFB 
#SA0 
CouT 
RTBL-SFB,X 
cout 
#SBD 
COUT 
ACC+5,X 
PRBYTE 
RDS Pl 
BRANCH TAKEN, 
#S$01 ADD LEN+2 TO PC 
(PCL) ,Y 
PCADJ3 
PCL 
PCINC2 
SAVE NORMAL RETURN AFTER 
XEQ USER OF 
PCINC3 GO UPDATE PC 
DUMMY FILL FOR 
NBRNCH XEQ AREA 
BRANCH 
$cl 
$D8 
$D9 
$DO0 
$D3 
PTPIG TRIGGER PADDLES 
#$00 INIT COUNT 
COMPENSATE FOR 1ST COUNT 
PADDLO,X COUNT Y=-PEG EVERY 
RTS 2D 12 USEC 
PREAD2 EXIT AT 255 MAX 
#$00 CLR STATUS FOR DEBUG 
STATUS SOFTWARE 
LORES . 
LOWSCR INIT VIDEO MODE 
TXTSET SET FOR TEXT MODE 
#S00 FULL SCREEN WINDOW 
SETWND 
TXTCLR SET FOR GRAPHICS MODE 
MIXSET LOWER 4 LINES AS 
CLRTOP TEXT WINDOW 
#$14 
WNDTOP SET FOR 40 COL WINDOW 
#$00 TOP IN A-REG, 
WNDLFT BTTM AT LINE 24 
#$28 
WNDWOTH 
#$16 
WNDBTM VTAEB TO ROW 23 
#$17 
CV VTABS TO ROW IN A-REG 
VTABP 
4D1 ABS VAL OF AC AUX 
#$10 INDEX FOR 16 BITS 
ACL ACX = AUX + X¥TND 
A TO AC, XTND 
MUL4 IF NO CARRY, 
NO PARTIAL PROD. 
#SPE 


XTNDL+2,X-ADN MPLCND 


(AUX) 


AUXL+2,X TO PARTIAL PROD 


XTNDL+2,X% 


“UL3 
#$03 
#$76 
#$50 
MULS 


MUL2 
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(XTND). 


FRB1: 
FB84: 
FB&6: 
FB88: 
FBSA: 
FBSC: 
FBS8E: 
FBSF: 
FB91: 
FB93: 
FB94: 
FB96: 
FB9B: 
FBSA: 
F89Cs: 
FBIE: 
PBAO: 
FBA]Ls: 
FBA3: 
FBA4: 
PBA6: 
FBAS8: 
FBAA: 
FBAD: 
FBAF: 
FBB1: 
FBB3: 
FBB4: 
FBB5: 
FBB?7: 
FBB9: 
FBBA: 
FBBC: 
FBBE : 
FBCO: 
FBCl: 
FBC2: 
PBC3: 
FBC5: 
FBC7: 
FBC9: 
FBCA: 
FBCC: 
FBCE: 
FBDO: 
FBD2: 
FBD3: 
FBD4: 
FBD6: 
FBD8: 
FBD9: 
FBDB: 
FBDD: 
FBDF: 
FERE2: 
FBE4: 
FBE6: 
FBE9: 
FBEC: 
FBED: 
FBEF: 
FBFO: 
FSF2: 
FBF4: 
FBF6: 
FBF8: 
FBFA: 
FBFC: 
FBFDs: 
FBFF: 


FCO]: . 


FCO2: 
FCO4: 
FCO6: 
FCO8: 
FCOA: 
FCOC: 
FCOE: 
FC10: 
FC1l2: 
FC14: 
FC16: 
FC18: 
FCIA: 
FC1C: 


A4 FB DIVP" 


10 
50 


Fe 


FC 


FC 
co 


DIV 
DIv2 


SIv3 


MD1 


4D2 


MD3 


MDRTS 
BASCALC 


8SCLC2 


BELLI 


BELL2 


RTS 22 
S'TOANV 


ADVANCE 


PTS3 
VIBOUT 


es 


UP 


JSR 
LCY 
ASL 
ROL 
ROL 
ROL 
SEC 
LDA 
Sec 
TAX 
LOA 
Soc 
BCC 
STX 
STA 
INC 
OEY 
BNE 
RTS 
LDY 
STY 
LDX 
JSR 
LDX 
LDA 
BPL 
SEC 
TYA 
SBC 
STA 
TYA 
SBC 
STA 
INC 
RTS 
PHA 
LSR 
AND 
ORA 
STA 
PLA 
AND 
BCC 
ADC 
STA 
ASL 
ASL 
ORA 
STA 
RTS 
CMP 
BNF 
LDA 
JSR 
LDY 
LDA 
JSR 
LDA 
NEY 
SNE 
RTS 
LDY 
STA 
INC 
LDA 
Cme 
BCS 
RTS 
CMP 
BCS 
TAY 
SPL 
CMP 
BEQ 
C™P 
BEQ 
CMP 
BNE 
DEC 
BPL 
LDA 
STA 
DEC 
LDA 
CMP 


Mp1 
#$10 
ACL 
ACH 
XTNOL 
XTNDH 


XTNOL 
AUXL 


XTNOA 
AUXH 
DIV3 
XTNDL 
XTNDH 
ACL 


DIV2 


#$00 
SIGN 
#AUXL 
MD2 
#ACL. 
LOC1,X 
MDRTS 


LOCO ,X 


LOC1,xX 
LOC1 ,X 
SIGN 


A 
#$03 


#$04 
BASH 


#$18 
BSCLC2 
#S7F 
BASL 

) 

A 
BASL. 
BASL 


&$87 
RTS 2B 
#$40 
WAIT 
#SCO 
#$0C 
WAIT 
SPKR 


PELL2 
Ci 


(PASL) ,Y 
CH 


Cil 
WNDWETH 
CR 


#SA0 
STOADV 


STOADV 
#$8D 


RTS 3 
WNDYDTH 
CH 

CH 
‘ANDTOP 
CV 
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ARS VAL OF AC, AUX. 
INDEX FOR 16 BITS 


YTND/AUX 
TO AC. 


MOS TO XTND. 


PRS VAL OF AC, AUX 
WITH RESULT SIGN 
IN LSB OF SIGN. 


X SPECIFIES AC OR AUX 


COMPL SPECIFIED REG 
IF NEC. 


CALC BASE ADR IN BASL,H 
FOR GIVEN LINE NO. 
O<sLINE NO.<#$17 

ARG=000AB8CDE, GENERATE 
BASH=f00001CD 

AND 
BASL#EABAB000 


BELL CHA®? (CNTRL-G) 
NO, RETURN 
DELAY .01 SECONDS 


TOGGLE SPEAKER AT 


1 KHZ FOR .1 SEC. 


CURSER H INDEX TO Y-REG 
STOR CHAR IN LINE 


INCREMENT CURSER HR INDEX 


(MOVE RIGHT) 
BEYOND WINDOW WIDTH? 
YES “P TO NFXT LINE 
NO, RETURN 
CONTROL CHAR? 
NO,OUTPUT IT. 
INVERSE VIDEO? 
YES, OUTPUT IT. 
CR? 
YES. 
LINE PEED? 
IF SO, DO IT. 
BACK SPACE? (CNTRL-H) 
NO, CHECK FOR RELL. 


DECREMENT CURSER H INDEX 
ELSE MOVE UP 


IF POS, OK. 
SET CH TO WNDWDTH=-1 


(RIGHTMOST SCREEN POS) 
CURSER V INDEX 


FADE: 
FAEO: 
FAE2: 
FAE4: 
PAE6: 
FAE9: 
FAEC: 
FAEF: 
FAF1: 
FAF4: 
PAF6: 
FPAFS: 
FAPA: 
FAFC: 
FAFD: 
FAFE: 
FBOO: 
FBO2: 
FBOS: 
FBO7: 
FBOS: 
FBO9: 
FBOB: 
FBOE: 
FBOF: 
FBll: 
FB12: 
FB133 
FB16: 
FB19: 
FBIA: 
FBI1B: 
FBIC: 
FB1D: 
FBLE: 
FB21: 
FB23: 
FB24: 
FB25: 
FB28: 
FB2A: 
FB2B: 
FB2D: 
FB2E: 
FB2F: 
FB31: 
FB33: 
FB36:3 
FB39: 
FB3C: 
FB3E: 
FB40: 
FB43:3 
FBA6: 
FB49: 
FB4B: 
FB4D: 
FB4F: 
FB51: 
FB53: 
FBSS: 
FB57: 
FBS9: 
FBSB: 
FB5D: 
FB60: 
FB63: 
FB65:3 
FB67: 
FB68: 


FBO6As - 


FB6B: 
FB6D: 
FBOF: 
FB71: 
FB73: 
FB74: 
FB76: 
FE78: 
FB793 
FB7A: 
FR7B: 
FB7Ds 
FB7E: 
FBS8O: 


0B 
FD 


FD 
FA 
FD 
FD 


FD 


F9 


FF 


FB 
FA 


co 


co 


co 
CO 
Co 


co 
Co 
F8 


FC 
FR 


RDSP1 


BRANCH 


NBRNCH 


INITBL 


RTBL 


PREAD 


PREAD2 


RTS2D 
INIT 


SETTXT 


SETGR 


SETWND 


TABV 
MULPM 


MUL 
MUL2 


MUL3 


MUL4 
MUL5 


LDA 
STA 
LDX 
LDA 
JSR 
LDA 
JSR 
LDA 
JSR 
LDA 
JSR 
INX 
BMI 
RTS 
CLC 
LDY 
LDA 
JSR 
STA 
TYA 
SEC 
BCS 
JSR 
SEC 
BCS 
NOP 
NOP 
JMP 
JMP 
DFB 
DFB 
DFB 
DFB 
DFB 
LDA 
LDY 
NOP 
NOP 
LDA 
BPL 
INY 
BNE 
DEY 
RTS 
LDA 
STA 
LDA 
LDA 
LDA 
LDA 


-BEQ 


LDA 
LDA 
JSR 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
JAP 
JSR 
LDY 
LDA 
LSR 
BCC 
CLC 
LDX 
LDA 
ADC 
STA 
INX 
BNE. 
LUX 
DFB 
DFR 
DEX 
8PL 
PEY 
BNE 
RTS 


#ACC/256 


A3H 
#SFB 
#SA0 
COUT 
RTBL~SFB,X 
cour 
#SBD 
CouT 
ACC+5,X 
PRBYTE 
RDSP] 
BRANCH TAKEN, 
#$01 ADD LEN+2 TO PC 
(PCL) ,Y 
PCADJ3 
PCL 
PCINC2 
SAVE NORMAL RETURN AFTER 
XEQ USER OF 
PCINC3 GO UPDATE PC 
DUMMY FILL FOR 
NBERNCH XEQ AREA 
BRANCH 
$¢Cl 
$DB 
$D9 
$DO 
$D3 
PTPIG TRIGGER PADDLES 
#$00 INIT COUNT 
COMPENSATE FOR 1ST COUNT 
PADDLO,X COUNT Y=-PREG EVERY 
RTS 2D 12 USEC 
PREAD2 EXIT AT 255 MAX 
#$00 CLR STATUS FOR DEBUG 
STATUS SOFTWARE 
LORES | 
LOWSCR INIT VIDEO MODE 
TXTSET SET FOR TEXT MODE 
#S00 FULL SCREEN WINDOW 
SETWND 
TXTCLR SET FOR GRAPHICS MODE 
MIXSET LOWER 4 LINES AS 
CLRTOP TEXT WINDOW 
#$14 
WNDTOP SET FOR 40 COL WINDOW 
#S00 TOP IN A-REG, 
WNDLFT BTTM AT LINE 24 
#$28 
WNDWOTH 
#$16 
WNDBTM VTAB TO ROW 23 
#$17 
CV VTABS TO ROW IN A-REG 
VTAR 
4D1 ABS VAL OF AC AUX 
#$10 INDEX FOR 16 BITS 
ACL ACX « AUX + XTND 
A TO AC, XTND 
MUL4 IF NO CARRY, 
NO PARTIAL PROD. 
#SPFE 


XTNDL+2,X-ADND MPLCND (AUX) 


AUXL+2,X 
XTWNDL+2,X% 


“UL3 
#$03 
#376 
#$50 
MULS 


MUL2 
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TO PARTIAL PROD 
(XTND). 


° PBB1: 
FB84: 
FB&6: 
FB88: 
FBSA: 
FBSC: 
FB8E: 
FBSFs: 
FB91: 
FB93: 
FB94: 
FB96: 
FB98: 
FBSA: 
F89Cs: 
FBIE: 
FBAO: 
FBALs: 
FBA3: 
FBA4: 
FPBA6: 
FBA8: 
FBAA: 
FBAD: 
FBAF: 
FBB1: 
FBB3: 
FBB4: 
FBB5: 
FBB?: 
FBB9: 
FBBA: 
FBBC: 
FBBE: 
FBCO: 
FBCl: 
FBC2: 
FBC3: 
FBC5S: 
FBC7: 
FBC9: 
FBCA: 
FS8CC: 
FBCE: 
FBDO: 
FBD2: 
FBD3: 
FBD4: 
FBD6: 
FBD8: 
FBD9: 
FBDB: 
FBDD: 
FBDF: 
FBE2: 
FBE4: 
FBE6: 
FBE9: 
FBEC: 
FBED: 
FBEFs: 
FBFO: 
FBF2: 
FBF4: 
FBF6: 
FBFB: 
FBFA: 
FBFC: 
FBFD: 
FBFF: 
FCO]: 
FCO2: 
FCO04: 
FC06: 
FCO8: 
FCOA: 
FCOC: 
FCOE: 
FC10: 
FCl2: 
FC14: 
FC16: 
FC18: 
FCIA: 
FCIC: 


A4 FB DIVP' 


10 
50 
51 
$2 
53 


Fe 


FC 


FC 
co 


DIV 
DIV2 


OIV3 


MD1 


MD2 


MD3 


MDRTS 
BASCALC 


8SCLC2 


BELLI] 


BELL2 


RTS 22 
S'TOANV 


ADVANCE 


PTS3 
VIBOUT 


BS 


UP 


JSR 
LCY 
ASL 
ROL 
ROL 
ROL 
SEC 
LDA 
Sec 
TAX 
LDA 
$8c 
BCC 
STX 
STA 
INC 
OEY 
BNE 
RTS 
LDY 
STY 
LDX 
JSR 
LDX 
LDA 
BPL 
SEC 
TYA 
SBC 
STA 
TYA 
SBC 
STA 
INC 
RTS 
PHA 
LSR 
AND 
ORA 
STA 
PLA 
AND 
BCC 
ADC 
STA 
ASL 
ASL 
ORA 
STA 
RTS 
CMP 
BNE 
LDA 
JSR 
LDY 
LDA 
JSR 
LDA 
NEY 
BNE 
RTS 
LDY 
STA 
INC 
LDA 
CMP 
BCS 
RTS 
CMP 
BCS 
TAY 
SPL 
CMP 
BEQ 
C™P 
BEQ 
CMP 
BNE 
DEC 
BPL 
LDA 
STA 
DEC 
LDA 
CMP 


MD1 
#$10 
ACL 
ACH 
XTNDL 
XTNDE 


XTNOL 
AUXL 


XTNO# 
AUXH 
DIV3 
XTNDL 
XTNNF 
ACL 


DIV2 


#$00 
SIGN 
#AUXL 
MD2 
#ACL 
LOC1,X 
MDRTS 


LOCO ,X 
LOCO ,X 


LOC1,X 
LOC1,X 
SIGN 


A 
#S$03 


#$04 
BASH 


#$18 
BSCLC 2 
#S7F 
BASL 

A 

A 
BASL. 
BASL 


#$87 
RTS 2B 
#$40 
WAIT 
#SCO0 
#$0C 
WAIT 
SPKR 


PELL2 
Ci 


(BASL) ,Y¥ 
CH 


Ci! 
WNDWDTH 
CR 


#SAQ 
STOADV 


STOADV 
#S8D 


RTS 3 
WNDNDTH 
CH 

CH 
‘ANDTOP 
CV 
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ARS VAL OF AC, AUX. 
INDEX FOR 16 BITS 


YTND/AUX 
TO AC. 


MOS TO XTNO. 


PS VAL OF AC, AUX 
WITH RESULT SIGN 
IN LSB OF SIGN. 


X SPECIFIES AC OR AUX 


COMPL SPECIFIED REG 
IF NEG. 


CALC BASE ADR IN BASL,H#H 
FOR GIVEN LINE NO. 
O<=LINE NO.<2$17 

ARG=000A8CDE, GENERATE 
BASH=(00001CD 

AND 
BASL#EABAB000 


BELL CHAR? (CNTRL-G) 
NO, RETURN 
DELAY .01 SECONDS 


TOGGLE SPEAKER AT 
1 KHZ FOR .1 SEC. 


CURSER H INDEX TO Y-REG 
STOR CHAR IN LINE 
INCREMENT CURSER H INDEX 
(MOVE RIGHT) 
BEYOND WINOOW WIOTH? 
YES *“P TO NEXT LINE 
NO, RETURN 
CONTROL CHAR? 
NO,OUTPUT IT. 
INVERSE VIDEO? 
YES, OUTPUT IT. 
CR? 
Yes. 
LINE FEED? 
IF SO, DO IT. 

BACK SPACE? (CNTRL-H) 
NO, CHECK FOR BELL. 
NECREMENT CURSER # INDEX 
IF POS, OX. ELSE MOVE UP 

SET CH TO RNDWDTH-1 


(RIGHTMOST SCREEN POS) 
CURSER V INDEX 


FCILE: 
FC20: 
FC22: 
FC24: 
FC27: 
FC29: 
FC 2B: 
FC2C: 
FC2E: 
FC30: 
FC32: 
FC34: 
FC36: 
FC38:3 
FC3A: 
FC3C: 
FC3E: 
FC40: 
FC42: 
FC 44: 
FC46: 
FC47: 
FC4A: 
FC4Ds: 
FC4F: 
FC50: 
FC52: 
FC54: 
FC56: 
FC58: 
FC5A: 
FC5C: 
FC5E: 
FC603 
FC62: 
FC64: 
FC66: 
FC68: 
FC6A: 
FC6C: 
FC6E: 


FC703 
FC72: 
FC73: 
FC76: 
FC78: 
FC7A: 
FC7Cs 
FC7E: 
FC80: 
FC81: 
FC82: 
FC84: 
FC86: 
FC88: 
FC89: 
FC8C: 
FCBEs: 
FC90: 
FC91: 
FC93: 
FC95: 
FC97: 
FC9OA: 
FC9C: 
FC9OE: 
FCAO: 
FCA2: 
FCA3: 
FCA5S: 


FCA7s - 


FCA8: 
FCA9: 
FCAA: 
FCACs: 
FCAE: 
FCAFs: 
FCB1: 
FCB3: 
FCB4: 
FCB6:3 
FCB8s: 
FCBAs 
FCBCs: 
FCBE: 


FB 


FC 
FC 


FC 


FC 


FC 


VTAE 
VTA8Z 


RTS4 
ESC1l 


CLREOP 


CLEOP] 


HOWE 


CR 
LF 


SCROLL 


SCRL1] 


SCRL2 


SCRL3 


CLREOL 
CLEOLZ 
CLEOL2 


AAI T 
WAI T2 
WAI?T3 


NXTA4 


NXTA1 


PASCALC 
WNDLFT 
BASL 


#S$CU 
HOME 
#SFD 
ADVANCF 


#$00 
CLEOP] 


CV 
WNDRTF 
VTAPZ 
CV 
WNNTOP 


VTARZ 
BASL 
BAS2L 
BAS4 
BAS 2H 
ANDWDTH 


#S$01 
WNDaTM 
SCRL3 


VTABZ 


IF TOP LINE THEN PETURN 
DECR CURSER V-INDEX 

GET CURSER V-INDEX 
CENERATE BASE ADDR 

ADD WINDOW LEFT INDEX 
TO BASL 


ESC? 

IF SO, DO HOME AND CLEAR 

ESC-A OR B CHECK 
A, ADVANCE 
B, RACKSPACE 

ESC=-C OR D CRECK 
C, DOWN 
D, GO UP 

ESC-E OF F CHECK 
FE, CLEAR TO END OF LINE 
NOT F, RETURN 

CURSOR H TO Y INDEX 

CURSOR V TO A-REGISTER 

SAVE CURRENT LINE ON STK 

CALC RASE ADDRESS 

CLFAR TO EOL, SET CARRY 

CLEAR F°GCM H INDEX20 FOR REST 

INCREMENT CURRENT LINE 

(CARRY IS SET) 

NOWE TO BOTTOM OF “WINDOW? 
NC, KEEP CLEAPING LINES 
YES, TAB TO CURRENT LINE 

INIT CURSOR V 
AND H-INDICES 


THEN CLEAR TO END OF PAGE 


CURSOR TO LEFT OF INDFX 
(PET CURSOR H=0) 
INCR CURSOP V(CDOWN 1] LINE) 


OFF SCREEN? 

NO, SET BASE ADDR 
DECP CURSOR V(BACK TO B30TTOM LIMB) 
START AT TOP OF SCRL WNDW 


GENERATE BASE ADDRESS 
COPY BASL,H 
TO BAS2L,H 


INIT Y TO RIGHTMOST INDEX 
OF SCROLLING WINDOW 


INCR LINE NUMBER 
DONE? 
YES, FINISH 


FORM BASL,H (BASE ADDR) 


(RBASL) ,Y MOVE A CHR UP ON LINE 
(BAS2L) ,Y 


SCRL2 
SCRL1 
#$00 
CLEOLZ 
VraRr 
CH 
#SA0 


(RASL) ,Y 


WNDWPTH 
CLEOL2 


NEXT CHAR OF LINE 


NEXT LINE 

CLEAR BOTTOM LINE 

GET BASE ADOR FOR BOTTOM LINE 
CARRY IS SET 

CURSOR H INDEX 


STORE BLANKS FROM ‘HERE' 
TO BEND OF LINES (WNDWDTB) 


1.0204 USEC . 
(134271 2*A+512*A*A) 


INCR 2=-PYTE A4 e 
AND Al 


INCP 2=-BYTF Al. 


AND COMPARE 70 A2 


FC 


FC 


co 


FC 


co 


00 


co 
co 


co 


FO 
FC 
FD 


02 
FD 


02 


FF 


FD 


RTS448 
HEADK 


WRBIT 


ZEPOLY 


ONECLY 
WRTAPE 


RDBYTE 
RDBYT 2 


RD2BIT 
‘ROPIT 


RQDKEY 


KEYIN 


KEYIN2 


Esc 


PDCHAR 


NOTCR 


NOTCR1 
CANCEL 


SBC 
INC 
BNE 
INC 
RTS 
LPY 
JSR 
SNE 
ADC 
8cs 


LOY 
JSR 
INY 
IWY 
DEY 
BNE 
ACC 
LDY 
DEY 
BNE 
LDY 
LDY 
DEX 
RTS 
LDX 
PHA 
JSP 
PLA 
ROL 
LDY 
DEX 
BNE 
RTS 
JSR 
DEY 
LDA 
EOR 
BPL 
EOR 
STA 
CPY 
FTS 
LDY 
LDA 
PHA 
AND 
ORA 
STA 
PLA 
J¥p 
INC 
BNE 
INC 
BIT 
BPL 
STA 
LDA 
BIT 
RTS 
JSR 
JSR 
JSP 
Ci4p 
SEO 
RTS 
LDA 
PHA 
LDA 
STA 
LDA 
JSR 
PLA 
STA 
LDA 
CMP 


- PEQ 


CMP 
PEO 
CPX 
BCC 
JSR 
INX 
BNE 
LDA 
JSR 


A2h 
JIL 
RTS 48 
Alki 


e$4n 
ZERDLY 
HEADP 
SSFF 
4E ADR. 
#621 
ZERDLY 


ZEROLY 
WRTAPE 
#$32 


ONEDLY 


TA PEOUT 


#S2C 


#$08 
RO2BIT 


A 
€S3A 


RDBYT 2 
RD2aIt 


TAPEIN 
LASTIN 
ROBIT 
LASTIN 
LASTIN 
#S80 


Ca 


(PASL) ,Y 


#S3F 
¥$40 


(EASL) ,Y 


(KSiL) 
ENDL 
KFYIN2 
RNDH 
KBD 
KEY Tél 


(BASL) ,Y¥ 


K&D 


KROSTRR 


PDKFY 
ESCl 
ROKEY 
#$95 
FSC 


INVFLG 


#SFF 
INVFLG 
IN ,X 
CcouT 


INVFLG 
IN, x 
#$68 
BCKSPC 
#s9e 
CANCEL 
#SF8 


NOTCR1. 


RELL 


NXTCHAR 


#S$DC 
COUT 
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(CARRY SET IF >=) 


WRITE A*256 


‘LONG 1° 


HALF CYCLES 
(650 USEC EACH ) 


THEN A 


‘SHORT Q' 


(400 USEC) 
WRITE TWO HALF CYCLES 


OF 250 USEC ('0') 


OR 500 USEC 


(°0") 


Y IS COUNT FOR 
TIMING LOOP 


8 BITS TO READ 


READ TWO TRANSITIONS 


(FIND EDGE) 


NEXT BIT 


COUNT FOR SAMPLES 


DECR Y¥ UNTIL 


TAPE TRANSITION 


SET CARRY ON Y=PEG. 


SET SCREEN TO FLASH 


GO TO USER KEY-IN 


INCR RND NUMBER 


KEY DOWN? 


LOOP 


REPLACE, FLASHING SCREEN 
CEL KEYCODE 


CUR KFY STROBE 


GET KFYCODE 


RANDLE ESC FPUNC. 


READ «FY 


ESC? 


YEE, DON'T RETURN 


ECHO USER LINE 
NON INVERSE 


CHECK FOR EDIT KEYS 


BS, CTRL-X. 


MARGIN? 


YES, SOUND PELL 


ANVANCE INPUT INDEX 
BACKSLASH AFTER CANCELLED LINE 


FD67: 
FD6A: 
FD6C: 
FD6F: 
FD71: 
FD72: 
FD74: 
FD75: 
FD78: 
FDO7A: 
FD7C: 
FD7E: 
FD80: 
FD82: 
FD84: 
FD87: 
FO89:3 
FD8B: 
FD8E: 
FD9O0: 
FD92: 
FD94: 
FD96: 
FD99s 
FDIC: 
FD9E: 
FDAO: 
FDA3: 
FDAS: 
FDA7: 
FDA9: 
FDAB: 
FDAD: 
FDAF: 
FOBI: 
FDB3: 
FDB6: 
FDB8: 
FDBB: 
FDBD: 
FDCO: 
FDC3: 
FDCS5: 
FDC6: 
FDC7: 
FDC9: 
FDCA: 
FDCB: 
FDCD: 
FDCF: 
FDD1: 
FDD3: 
FDD4: 
FDD6: 
FDD9: 
FDDA: 
FDDB: 
FDDC: 
FDDD: 
FDDEs: 
FDDF: 
FDE2: 
FDE3: 
FDES5: 
FDE7: 
FDE9: 
FDEB: 
FDED: 
FDFO: 
FDF2: 
FDF4: 
FDF6: 
FDF8: 
FDF9: 
FDFC: 
FDFD: 
FDFF: 
FEOO: 
FEQ2: 
FEQ4: 
FEOS5: 
FEO7: 
FEO9: 
FEOB: 
FEOD: 


FD 


FD 


FD 


02 


FC 


FD 
F9 


FD 


FD 
FD 


FD 
FC 


FD 


FD 


00 


FB 


GETLNZ 
GETLN 


BCKSPC 


NXTCIJAE 


CAPTST 


ADDINP 


CROUT 


PRA] 
PRYX2 


XAM8 


MOCARCHK 


XAM 


DATAOUT 


RTS 4C 
XAMPM 


ADD 


PRBYTE 


PRHEX 
PRHEXZ 


COUT 
courl 


COUTZ 


BL] 
BLANK 


STOR 


JSR 
LDA 
JSR 
LOX 
TXA 
SEQ 
DEX 
JSP 
CMP 
BNE 
LDA 
CMP 
BCC 
ANN 
STA 
CMP 
BNE 
JSR 
LDA 
SNE 
LDY 
LD% 
JSR 
JSP 
LDY 
LDA 
J‘“P 
LDA 
ORA 
STA 
LDA 
STA 
LDA 
AND 
BNE 
JSR 
LDA 
JSR 
LDA 
JSR 
JSR 
BCC 
RTS 
LSR 
8CC 
LSR 
LSR 
LDA 
BCC 
EOR 
ADC 
PHA 
LDA 
JSR 
PLA 
PHA 
LSR 
LSR 


LSP. 


LSR 
JSR 
PLA 
AND 
ORA 
CMP 
BCC 
ADC 
JMP 
CMP 
BCC 
AND 
STY 
PHA 
JSR 
PLA 
LDY 
RTS 
DEC 
BEQ 
DEX 
BNE 
CMP 
BNE 
STA 
LDA 


CrRoUT 
PROMPT 


CouT 
#S01 


GETLN2 
RDCHAR 


#PICx 
CAPTST 


(BASL) ,Y 


#SF0O 
ADDINP 
#SOF 
IN,X 
#$8D 
NOTCR 
CLREOL 
#S8N 
COUT 
AlH 
AIL 
CROUT 
PRATYX 
#500 
#SAN 
cout 
AlL 
ts07 
A2L 
AlH 
A2H 
ALL 


#S07 


DATAOUT 


PRA] 
#SA0 
cout 


(A1L),¥Y 


PREYTE 
NXTAI 


MODSCHA 


A 
XAM 
A 

A 
A2L 
ADDN 
#SFF 
AlL 


#S3D 
COUT 


A 
A 
A 
a 
PRHEXZ 
#SOF 
#S$20 
#SBA 
COUT 
#$06 
(CSL) 
#SA0 
COUTZ 
INVFLG 
YSAV] 


VINOUT 
YSAV1 


YSAV 
XAM8 


SETMDZ 
#SBA 
XAMPM 
MODE 
A2L 
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OUTPUT CR 
OUTPUT PROMPT CHAR 


INIT iNPUT INDEX 
WILL ®ACKSPACE TO 0 


USE SCREEN CHAR 
FOR CTRL<-U 
CONVERT TO CAPS 


ADD TO INPUT 38BUF 
CLR TO FOL IF CR 


PRINT CR,Al. IN HEX 


PRIWT ‘-' 


SET TO FINISH AT 
MOD @=7 


OUTPUT BLANK 


OUTPUT BYTE IN HEX 
CHECK IF TIME TO, 
PRINT ADOR 
DETERMINE IF MON 
MODE IS XAM 
ADD, OR SUB 


SUS: FORM 2°S COMPLEMENT 
PRINT ‘=', THEN RESULT 


RINT BYTE AS 2 HEX 
PIGITS, DESTROYS A=-REG 


PRINT HFX DIG IN A=REG 
LS8°S. 


VECTOR TO USER OUTPUT ROUTINE | 


DON'T OUTPUT CTRL'S INVERSE 


MASK WITH INVERSE FLAG 
SAV Y-REG 
SAV A=-PEG 
OUTPUT A=-REG AS ASCII 
RESTORE A=-REG 

AND Y=-REG 
THEN RETURN 


RLANK TO MON 


AFTER BLANK 
DATA STORE MODE? 
NO, XAM, ADD OR SUB 


KEEP IN STORE MODE 


FEOF: 
PE1l: 
PE13: 
FE15: 
FE17: 
FE18: 
FEA: 
FED: 
FE1F: 
FE20: 
FPE22: 
FE24: 
FE26: 
FE28: 
FE29: 
FE28: 
FE2C: 
FE2E: 
FE30: 
FE33:3: 
FE35: 
FE 36: 
FE38: 
FE3A: 
FE3C: 
FE3F: 
FE41: 
FE44: 
FE46: 
FE 49: 
FE4B: 
FE4E: 
FE50: 
FE53: 
FESS: 
FE58: 
FE5B: 
FE5D: 
FE5E: 
FE61: 
FE63:3 
FE64: 
FE67s 
FE6A: 
FE6C: 
PE6E: 
FE6Fs: 
FE70: 
FE72: 
FE74: 
FE75: 
FE76:3 
FE78: 
FE7A: 
FE7C: 
FE7Ds 
FE7F: 
PE80: 
FE82: 
FE84: 
FE86: 
FE88: 
FE89: 
FE8B: 
FE8D: 
FESF: 
FE91: 
FE93: 
FE9S5: 
FE97: 
FE99: 
FE9SB: 
FE9D: 
FEQFs 
FEA]: 
FEA3: 
FEAS: 
FEA7: 
FEAQ: 
FEAB: 
FEADs: 
FEAE: 
FEAF: 
FEBO: 
FEB3: 


01 


FC 


FD 
FD 
FD 
FD 
FD 
FD 
EC 


75 FE 


F8 
F9 


00 £0 
03 EO 


RTS5 
SETMODE 


SETMDZ 


Lr 
LT2 


“OVE 


VFY 


VF YOK 


Al1PC 


ALPCLP 


A1PCRTS 
SETINV 


SETWORM 
SETIFLG 


SETK3D 
INPORT 
INPRT 


SETVID 
OUTPORT 
OUT PRT 


IOPRT 


IOPRT1 
IOPRT2 


XPASIC 
BASCONT 


STA 
INC 
BNE 
INC 
RTS 
LDY 
LDA 
STA 
RTS 
LDX 
LDA 
STA 
STA 
DEX 
BPL 
RTS 
LDA 
STA 
JSR 
BCC 
RTS 
LOA 
CMP 
REO 
JSR 
LDA 
JSR 
LDA 
JSR 
LDA 
JSR 
LDA 
JSF 
LDA 
JSR 
JSR 
acc 
RTS 
JSP 
LDA 
PHA 
JSR 
JSP 
STA 
STY 
PLA 
SEC 
SBC 
BNE 
RTS 
TXA 
PEC 
LDA 
STA 
DEX 
EPL 
RTS 
LDY 
BNE 
LDY 
STY 
RTS 
LDA 
STA 
LOX 


- LDY 


BNE 
LDA 
STA 
LDX 
LDY 
LDA 
AND 
BEQ 
ORA 
LDY 
PEQ 
LDA 
STY 
STA 
PTS 
NOP 
NOP 
JP 
JMP 


(A3L),Y STORE AS LOW BYTE AS (A3) 
A3L 
RTS5 


A3H 


INCR 43, RETURN 


SAVE CONVERTED ‘s:', ‘#°, 


t—%., ‘,? AS MODE. 


YSAV 
IN-] Pe 4 
MODF 


#$01 

A2L,X 
A4L,X 
ASL,X 


COPY A2 (2 8YTES) TO 
A4 AND AS 
LT2 


MOVE (Al TO A2) TO 
(A4) 


(ALL) ,Y 
(A4L) ,Y 
NXTA4 
MOVE 


VERIFY (Al TO A2) WITH 
(A4) 


(AIL) ,¥ 
(A4L),Y 
VFYCK 
PRA] 
(ALL) ,Y 
PRAYTE 
#SAG 
couT 
#SAB 
COUT 
(A4L) ,¥ 
PRBYTE 
#SA9 
cour 
NXTA4 
Vey 


Al1PC 
#$14 


“VE Al (2 BYTES) TO 
PC IF SPEC'D ANDO 
NISSEMELE 20 INSTRS 
INSTDSS | 
PCACJ 

PCL 
PCH 


ADJUST PC EACH INSTR 


#S01 NEXT OF 20 INSTRS 


LIST2 


IF USER SPEC*D ADR 
AlPCRTS COPY FROM Al TO PC 
AlL,X 


PCL,X 
AlPCLP 


#S$3F 
SETIFLG 
#SFF 
INVFLG 


SET FOR INVERSE VID 
VIA CoOUT1 
SET FOR NORMAL VID 


#S00 
A2L 
#KSWL 
#KEYIN 
IOPRT 
#$00 
A2L 
#CSL . 
#COUT 1 
A2L 
#SOF 
IOPRT1 
#IOADR/256 
#$00 
ICPRT2 
#COUT1/256 
LOCO ,X 
LOC1,X 


SIMULATE PORT #0 INPUT 
SPECIFIED (KEYIN ROUTINE) 


SIMULATE PORT #0 OUTPUT 
SPECIFIED (COUT1 ROUTINE) 


SET RAM IN/OUT VECTORS 


TO RASIC WITH SCRATCH 


CONTINUE BASIC 


RASIC 
BASIC2 
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FEB6: 
FEB9: 
FEBC: 
FEBF: 
FEC2: 
FEC4: 
FEC7: 
FECAs: 
FECD: 
FECFs: 
FED2: 
FED4: 
FED6: 
FED8: 
FED9: 
FEDB: 
FEDE: 
FEEL: 
FEE3: 
FEE4: 
FEE6: 
FEES: 
FEEB: 
FEED: 
FEEFs: 
FEFO: 
FEF3: 
FEFS5: 
FEF6: 
FEF9: 
FEFAs 
FEFB: 
FEFD: 
FFQO: 
FFO2: 
FFOS: 
FFO7: 
FFOA: 
FFOC: 
FFOF: 
FF1l: 
FF14: 
FF16: 
FF19: 
FF1B: 
FF1D: 
FFIF: 
FF22: 
FF24: 
FF26: 
FF29: 
FF2B: 
FF2D: 
FF2F: 
FF32: 
FF34: 
FF37: 
FF3A: 
FF3C: 
FF3F: 
FE41: 
FF42: 
FEF44: 
FF 46: 
FF48: 
FF49: 
FF4A: 
FF4C: 
FF4E: 
FF50: 
FF51: 


FF52:. 


FF54: 
FF5S: 
FES7: 
FF58:3 
FF59: 
FF5C: 
FFSFs 
FF62: 
FF65: 
FF663 
FF693 
FF6B: 
FF6D: 


FE 
FC 


FE 


FC 


FE 


FC 


FC 
FC 


FC 


FC 
FC 


FC 


FC 


FE 
FB 
FE 
FE 


FF 


FD 


GO 


ReoZ 
TPACE 
STEPZ 


USP 
WRITE 


WRI 


WRBYTE 
WRBYT2 


CRMON 


READ 


RD2 


RD3 


PRERR 


RELL 


RESTORE 


RESTR1 


SAVE 
SAV1 


FESET 


MON 


4MONZ 


JSR 
JSR 
JMP 
J¥P 
DEC 
JSP 
J“P 
JP 
LDA 
JSR 
LDY 
LOX 
EOP 
PHA 
LDA 
JSR 
JSR 
LDY 
FLA 
BCC 
LOY 
JSR 
BEC 


LDX 
ASL 
JSR 
BNE 
RTS 
JSR 
PLA 
PLA 
BNE 
JSR 
LDA 
JSR 
STA 
JSR 
LDY 
JSR 
BCS 
JSR 
LDY 
JSR 
STA 
EOR 
STA 
JSR 
LDY 
RCC 
JSR 
CMP 
3E0 
LDA 
JSR 
LDA 
JSR 
JSR 
LDA 
JiAP 
LDA 
PHA 
LDA 
LPX 
LDY 
PLP 
RTS 
STA 
STX 
STY 
PHP 
PLA 
STA 
TSX 
STX 
CL) 
PTS 
JSR 
JSR 
JSR 
JSR 
CLD 
JSR 
LDA 
STA 
JSR 


A1PC 
RESTORE 
(PCL) 
REGNSP 
YSAV 
AlPC 
STEP 
USRADR 
#S$40 
HEADR 
#$27 
#$00 
(A1L,X) 


(ALL, 
WRRYTE 
NXTAL 
#$10D 


wed 
#$22 
WREYTE 
Fe ib 


#$10 
A 


WRBIT 
WROYT2 


BL1 


MONZ 
RO2BIT 
#$16 
HEADR 
CHKSUM 
RO2BIT 
#$24 
RDBIT 
RD2 
ROBIT 
#$35 
RPAYTE 
(A1L,X) 
CH«KSUM 
CHKSU™ 
NXTA1 
#$35 
RD3 
ROLCYTE 
CHKSUM 
BELL 
#SC5 
CouT 
#SD2 
CouT 
cout 
#So7 
COUT 
STATUS 


ACC 
XREG 
YREG 


ACC 
XREG 
YRFG 


STATUS 


SPNT 


SETNOR: 
INIT 
SETVID 
SETKBD 


BELL 
#SAA 
PROMPT 
GETLNZ 
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ADR TO PC IF SPEC'D 
RESTORE META REGS 
GO TO USER SUBR 

TC REG NISPLAY 


ADR TO PC IF SPEC'D 
TAKE ONE STEP . 
TO USP SUBR AT USRADR 


WRITE 10-SEC HEADER 


HANDLE CR AS BLANK 
THEN POP STACK 
AND RTN TO MON 


FIND TAPEIN EDGE 


DerAY 3.5 SECONDS 

INIT CHKSUM=SFF 

FIND TAPEIN EDGE 

LOOK FOR SYNC PIT 
(SHORT 0) 
LOOP UNTIL FOUND 

SKIP SECOND SYNC H-CYCLE 

INDEX FOR 0/1 TEST 

READ A BYTE 

STORE AT (Al) 


UPDATE RUNNING CHKSUMA 
INCR Al, COMPARE TO A2 
COMPENSATE 0/1 INDEX 
LOOP UNTIL DONE 

READ CHKSU™ 3YTE 


GOOD, SOUND BELL AND RETUPN 
PRINT “ER”, THEN BELL 
OUTPUT PELL AND RETURN 


RESTORE 6502 PEG CONTENTS 
USED 23Y DERUG SOFTWAPE 


SAVE 6502 REG CONTENTS 


SF SCREEN ‘ODE 
AND INIT KBD/SCREEN 
AS 1/0 DEV'S 
MUST SET HEX MODE! 
'** PROMPT FOR MON 


READ A LINE 


FF70: 
FF73: 
FF76: 
FF78: 
FF7A: 
FF7B: 
FE7Ds 
FF8O0: 
FF82: 
FF8S5S: 
FF87: 
FFSA: 
FF8C: 
FFS8D: 
FFSE: 
FFSF: 
FF9O: 
FF9O1: 
FF93: 
FF95: 
FF96: 
FF98: 
PFOA: 
FF9OC: 
FF9E: 
FFAQO: 
FFA2: 
FFA3: 
FFAS: 
FFA7: 
FFAQ: 
FFAB: 
FFAD: 
FFBO: 
FFB1: 
FFB3: 
FFS85: 
FPB7: 
FPBO: 
FFB: 
FrBDs 
FFEEs 
FFCO: 
FFC1l: 
FFC4: 
FFC5: 
FFC7s 
PFCQ9s 
FFCBs 
FFCCs 
FFCDs: 
FFCEs: 
FFCFs 
FEFDOs: 
FFD1: 
FFD2: 
FFD3: 
FFO4: 
FFDS: 
FFD6: 
FFD?7: 
FED6: 
FFN9s: 
FFDA: 
FFDB: 
FFDCs 
FFDDs: 
PFDEs: 
FEDF: 
FFEO: 
FFE1: 
FFE2: 
FFE3: 
FPFE4: 
FFESs 
FFE6: 
FRE7: 
FFE8: 
FFE9s 
FFEA: 
FFEBs 
FFECs 
FERED: 
FFEEs 
FEEFs: 


FF 
FF 


FF 
FF 


FF 


02 


NXTITM 


CHRSRCA 


OIG 


NXTBIT 


NXTEAS 


NXTRS 2 


GE TrNU* 


NXTCKP 


Tosue 


ZSONE 


CHRTRL 


SURTEL 


JSR 
JSR 
STY 
LDY 
DEY 
RMI 
Che 
BNE 
JSR 
LbY 


JMP. 


LDX 
ASL 
ASL 
ASL 
ASL 
ASL 
ROL 
ROL 
DEX 
BPL 
LDA 
RNE 
LDA 
STA 
STA 
INX 
REQ 
ONE 
LDX 
STxX 
STX 
LDA 
Iny 
FOR 
CME 
RCC 
ADC 
CmP 
BCS 
KTS 
LCA 
PHA 
LEA 
PRA 
LOA 


LLY 
STY 
KTS 
DFP. 
OFF 
DFS 
OFB 
FP 
DFS 
DErr 
OPE 
DFR 
Bee 
DEE 
NEP 
DEO 
NFB 
DFP 
DFE 
DF2 
DFS 
DFB 
NEB 
DFe 
OFe 
DFR 
NDFB 
DFS 
CFs 
CEB 
DFS 
DFR 
DFB 
DFS 
DFB 
DFR 
DFB 
DF8 
DFS 


Z4O0E CLEAR “ON MODE, SCAN IDX 
GETNUM GET ITEM, NON-HEX 
YSAV CHAR IN A-REG 
$$17 X-REG#0 IP NO WEX INPUT 
MOW NOT FOUND, GO TO MON 
CHRTEL,Y FIND CMND CHAR IN TEL 
CHRSRCH 
TOSUS8 FOUND, CALL CORRESPONDING 
YSAV' SUBROUTINE 
WXTIT™M 
#803 
A 
A GOT HEX NIC, 
A SHIFT INTO A2 
A 
A 
A2L 
A2H 
LEAVE X#SFF IP DIG 
NXTBIT 
MODE 
NXTES2 IF MODE IS 2°RO 
A2#8,X THEN COPY A2 TO 
Al ,X Al ANTE A3 
A3H,X 
WwXTeAS 
NXTCHR 
SOC CLEAP A2 
A2L 
A2E 
IV,Y GET CHAR 
$S$3Q0 
#SOA 
GIG IF HEX OIG, THEN 
#S&& 
#SPA 
DIC 
800/256 PUSS AIGH-ORDNER 
SURP ADR OY STK 
SURTFL,Y PUSY LO: ORDER 
Suo.. ADR ON STK 
“ORE 
#SOC CLP “MODE, CLO “ODE 
MODE TO Ae-REG 
20 TO SUBR VIA PTS 
$3c F(“CTRL=-C“) 
SR2 F("*CTRL-Y") 
S3E F(“CTRL—-E*) 
Sen F(" f°) 
SEF F("V") 
sc4 F(*CTRL-K* ) 
SFC F("S") 
SAY F(“°CTPL=P") 
$32 F(“CTRL=R") 
$A6 F(’*=" 
SA4 F(“+") 
S00 F("M") (FPsEX-OP $804$89) 
$95 F("<") 
$07 F(“N") 
$02 F(“I") 
$65 F(“L") 
SFO e ("WwW") 
$00 B(“G*") 
SFS F(“R*) 
$93 F(“3s"“) 
$A? e(".") 
SCE F("CR") 
$99 F (BLANK) 
§BASCONT=-] 
#USK-] 
#2EGZ—) 
#TRACE-] 
#VFY-1 
#INPRT=-1 
#STEPZ=1 
#OUTPRT=-1 
#XPASIC=-1 
#SETMODE=] 
§SETMODE=-1 
#MOVE-1 
#LT-1] 
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FFFO: 
FFF1s: 
FFF2: 
FFF3: 
CFF 4: 
FFES5: 
FFFE: 
FRE7: 
FFFS: 
FFF9: 
FFA: 
FFFB: 
PEECs 
FEED: 
FFFEs 
FEE s 


XQOTNC 


OFB 
DFS 
OFB 
DFR 
OFB 
DFe 
DFB 
DFB 
DFB 
DFR 
DFB 
DFR 
DFB 
DEB 
DFB 


DFB 
EQU 


*SETWCRM-] 
#SETINV=] 

*LIST=l. 

$vVIRITE=] 

#GO-] 

SREAD-] 

&#SETMODE=1 
#SETMODE]=-1 

#CRMON]-] 

&BLANK-] 

«NMI NMI VECTOR 
#NMI/256 

#RESET RESET VECTOR 
#RESET/256 

#IRC IRO Vs¢ TOR 
#IRO/256 

$3c 
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F500: 
F502: 
F503: 
F505: 
E5073 
F509: 
FSOB; 
F50C: 
F50D: 
PSOE: 


FSOF: 


F511: 
F513: 


F515: 
F516: 


61 
14 


3F 
3F 


01 


3A 
3E 
01 


KSHKAKHEARHAKEKEREKRARAHRKARE 


* 
* APPLE-II 
* MINIMASSEM3LER 


COPYRIGHT 1977 PY 
APPLE COMPUTER INC. 


S. WOZNIAK 
A. 3SAUM 


ee eee eee ees & 


& 
e 

e 

t 

* ALL RIGHTS RESEPVED 
& 

& 

* 

* 

* 


SARAEKREAERERAKARAEHREEER 


TITLE “APPLE-II AINI-ASSEMSLER” 

FORAAT EPZ S2E 

LENGTH FPZ S$2F 

MODE EPZ $31 

PROM PT EP2 $33 

YSAV EPZ $34 

tL EPZ $35 

PCL EPZ S$3A 

PCH *€£P2 S$3e 

All EPZ $32 

4a2L CPZ $3é& 

A2i: EPZ S3F 

A4L EPZ $42 

Aa: EPZ $43 

euT EPZ $44 

IN EQU $200 

INSDSZ EQU SFE&EE 

INSTOSP EQU SFS&DO 

PR3&L2 EOU =SEY4A 

PCADJ EQU SF953 

CHAR] ENU SF984 

CHAK2 EQU SF9OSA 

MNEML ENU = SF9CO 

MNEAP FCU SFAO0O 

CURSUP 20U SFCIA 

GETLN2Z EOU $FO67 

cout ECU SFOED 

BL1 EQU SFEOOQ 

ALPCLE FOU SFE7& 

FELL EQU SFF3A 

GETNU" EOQU SFFAT 

TOSU2 BEX0 $FFEF 

ZONE ENU SFFC? 

CHRTSL EQG SFECC 
ORG SsF500 

REL src. se) Is PMT compaTi 
LSP A SITH RELATIVE 
CNE EFR3 QO. 
LOY A2,! 
Ley A2L HOURLE DFCRE& 
BNE REL2 
DEY 

REL2 DEX. 
TXA 
CLC 
SBC PCL FORM ADDR=-PC-2 
STA A2L 
BPL REL3 
INY 

REL3 TYA 
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ELE 
“ODE? 


vT 


F517: 
F519: 
F51B: 
FS1D: 
F520: 
F522: 
F523: 
F525: 
F528: 
F52B: 
FS2E: 
F531: 
F533: 
F535: 
F538: 
F53B: 
F53D: 
F540: 
F542: 
F544: 
F545; 
F547: 
FPS4A: 
F54C: 
FS4E; 
F550: 
F552: 
F554: 
F556: 
F559: 
F5S5C: 
FS5E: 
F561: 
F562: 
F565: 
F567: 
F569: 
F56C: 
FS6E: 
F570: 
F572: 
F574: 
F576: 
F578: 
FS7A: 
F57C3 
F57E: 
F580: 
F582: 
F584: 
F586: 
F588: 
F589: 
FS8A3 
F58D: 
F58F: 
F592: 
F595: 
F597?: 
F599: 
F59C: 
F59F: 
FSA2: 
FS5SA4: 
F5A63 
FSA7: 
FSA9: 
FS5ABs: 
F5AC: 
FSAF: 
F5B1: 
F5B3:3 
F5B4: 
F5B6: 
F5B9: 
FSBB: 
F5BD: 
FSCO: 
F5Cl: 
F5C3:3 
F5C5:3 
F5C7: 
F5C8: 
F5C9: 
F5CB: 


00 


FC 


FC 
F8 


F9 
F5 
FF 


FF 


FF 


FE 
FS 


F8 


FA 


F9 


F9 
FD 
FF 


FD 
FF 


02 


FF 


FE 


F6 


ERR3 
FINDOP 
FNNOP2 


FAKEMON3 


FAKEMON 


FAKEMON2 


TRYNEXT 


NREL 


NEXTOP 


ERR 
ERR2 


RESETZ 
NXTLINE 


ERR4 


SPACE 


NXTMN 
NXTM 


NXTM 2 


ASL 
SBC 
CMP 
BCC 
ASL 
ASL 
LDX 
ASL 


PCH 

ERR 
LENGTH 
AlH,Y 
(PCL) ,Y 


FNDOP2 
CURSUP 
CURSUP 
INSTDSP 
PCADJ 
PCH 

PCL 
NXTLINE 
TOSUB 
YSAV 
GETNUM 
YSAV 
#$17 


RESETZ 
CHRTBL,Y 
FAKEMONZ2 
#$15 
FAKEMON3 
MODE 

#$0 

YSAV 

BL1 
NXTLINE 
Al 
INSDS2 


MNEMR , X 
A4L 
NEXTOP 
MNEML,X 
A4H 
NEXTOP 
FMT 
FORMAT 
#$9D 
REL 
FORMAT 
FINDOP 
AlH 
TRYNEXT 
FMT 

L 
TRYNEXT 
YSAV 


PRBL2 
#SDE 
COUT 
BELL 
#SAl1 
PROMPT 
GETLNZ 
ZMODE 


IN 


#SA0 
SPACE 


#SA4 
FAKEMON 


GETNUM 
#$93 
SRR2 


ERR2 
A1PCLF 
#$3 
AlH 
GETNSP 
A 

#SBE 
#$C2 
ERR2 

A 

A 

#$4 

A 
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ERROR IF >1-BYTE BRANCH 


MOVE INST TO (PC) 


RESTORE CURSOR 
TYPE FORMATTED LINE 


UPDATE PC 


GET NEXT LINE 

GO TO DELIM HANDLER 
RESTORE Y-INDEX 

READ PARAM 

SAVE Y-INDEZ 

INIT DELIMITER INDEX 
CHECK NEXT DELIM 

ERR IF UNRECOGNIZED DELIM 
COMPARE WITH DELIM TABLE 
NO MATCH 


MATCH, IS IT CR? 
NO, HANDLE IT IN MONITOR 


HANDLE CR OUTSIDE MONITOR 


GET TRIAL OPCODE 
GET FMT+LENGTH FOR OPCODE 


GET LOWER MNEMONIC BYTE 
MATCH? . 

NO, TRY NEXT OPCODE 

GET UPPER MNEMONIC BYTE 
MATCH? 

NO, TRY NEXT OPCODE. 


GET TRIAL FORMAT 

TRIAL FORMAT RELATIVE? 
YES. 

SAME FORMAT? 


YES. 
NO, TRY NEXT OPCODE 


NO MORE, TRY WITH LEN#2 


WAS L=2 ALREADY? 
NO. 
YES, UNRECOGNIZED INST. 


PRINT ~ UNDER LAST READ 
CHAR TO INDICATE ERROR 


POSITION. 


ae 
INITIALIZE PROMPT 


GET LINE. 
INIT SCREEN STUFF 


GET CHAR 
ASCII BLANK? 
YES 


ASCII '$' IN COL 1? 
YES, SIMULATE MONITOR 


NO, BACKUP A CHAR 


GET A NUMBER 
's' TERMINATOR? 


NO, ERR. 


NO ADR PRECEDING COLON. 
MOVE ADR TO PCL, PCH. 
COUNT OF CHARS IN MNEMONIC 


CET FIRST MNEM CHAR. 
SUBTRACT OFFSET 


LEGAL CHAR? 


NO. 
COMPRESS-LEFT JUSTIFY 


DO 5 TRIPLE WORD SHIFTS 


FS5CC: 
F5CEs: 
F5D0:3 
F5D1: 
F5D3: 
F5D5: 
F5D7: 
F5D9: 
FSDB: 
FSDE: 
F5E03 
F5E3: 
F5SES: 
F5E8:3 
FSEBs 
F5ED: 
F5FO: 
F5F2: 
F5F4: 
FSF6: 
FSF8s 
FSF9: 
FSPFA: 
FSFC: 
F5FEs: 
F600: 
F603: 
F605: 
F607: 
F608: 
F60A: 
FoOCs 
F60D: 
F6OF: 
F610: 
F612: 
F614: 
F615: 
F616: 
F618: 
F6l1A: 
F61C: 
F6l1E: 
F620: 
F622: 
F624: 
F626: 
F629: 
F62B: 
F62Ds 
F62F: 
F631: 
F634: 
F637: 
F638: 
F63A: 
F63C: 


F666: 


F6 


F9 


F6 
e9 


F9 


er 


02 


F5 
02 


F5 


FORM1 
FORM 2 


FORM3 
FORM 4 
FORMS 


FOR¥ 6 


FORA? 


FORMS 


FORM9 
GETNSP 


MINASM 


A4L 
A4s 


NXTM2 
Al 

NX TM 2 
NXTMN 


#S5 
GETNSP 


. YSAV 


CHAR] ,X 
FORM3 
GETINSP 
CHAR2,X 
FORMS 
CuA22,X 
FORE 4 
#SA4 
FQPrta 
YSAV 


FAT 
#S$3 
PORM7 
GETNUY 
A2H 
FORM6 


L 
#$3 


Alli 


FORH2 
PMT 

A 

A 

L 
#$20 
FORMS 
L 


FORMS 
#$80 
FMT 
YSAV 
In,Y 
#$B3 
PORMY 
#S8D 
ERR4 
TRYNEXT 
IN,Y 


#SA0 
GETNSP 


SF666 
RESETZ 
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DONE WITH 3 CHARS? 

YES, RUT NO 1 MORE SHIFT 
NO 

5 CHARS IN ADDR HONE 

GPT FIRST CHAR OF ADDR 


FIRST CHAR MATCH PATTERN? 
N 


YES, GET SECOND CHAR 
*ATCHES SECOND HALF? 

YES 

NO, IS SECOND HALF ZERO? 
Yes. 

NG,SFCOMO HALF OPTIONAL? 
YES. 


CLEAR BIT=-NO MATCH 
RACK UP 1 CHAR 

FORM FORMAT BYTE 

TIME TO CHECK FOR ADDR. 


NO 
YES 


HIGH-ORDER BYTE ZERO 
NO, INCR FOR 2-BYTE 
STORE LENGTH 

RELOAD FORMAT INDEX 
PCACKUP A CHAR 

SAVE INDEX 

DONE WITH FORMAT CHECK? 
NO, 

YES, PUT LENGTH 

Iv LOW BRITS 


ADO '$* IF NONZERO LENGTH 
AND DON'T ALREADY HAVE IT 


GET NEXT NONBLANK 

‘;* START OF COMMENT? 
Yes 

CARRIAGE RETURN? 

WO, ERR. 


GET NEXT NON BLANK CHAR 


TITLE “FLOATING POINT ROUTINES“ 
SIGN EPZ $F3 
2 EPZ $F4 
M2 BPZ SE5 
x1 FPZ SER 
Ml FPZ2 $FY 
E EPZ SFC 
OVLOC BQU S3F5 
ORG $F425 
F425: 18 ADD CLC CLEAR CARRY. 
F426: A2 02 LDX #$2 INDEX FOR 3-BYTE ADD. 
F428: B5 F9 ADU] LDA %1,X 
F42A: 75 FS ADC M2,X AMD A SYTE OF MANT2 TO MANTI. 
F42C: 95 F9 STA Ml1,X 
F42E: CA DEY INDEX TO NEXT MORE SIGNIF. BYTE. 
F42F: 10 F7 BPL ADDI LOOP UNTIL ONE. 
F431: 60 RTS RETURN 
F432: 06 F3 MD] ASL SIGN CLEAR LSB OF SIGN. 
F434: 20 37 F4 JSR ARS7AP ARS VAL OF M1, THEN SWAP WITH M2 
F437: 24 F9 ARSWAP BIT 1 MANTI1 NEGATIVE? 
F439: 10 05 BPL ABSWAP1L NO, SVAP WITH MANT2 AND RETURN. 
F43B: 20 A4 F4 JSR FCOmPL YES, COMPLEMENT IT. 
F43E: £6 F3 INC, SIGo 1NC® SIGN, COMPLEMENTING LSB. 
F440: 38 ADS@AP1 = SEC SET CARPY FOR RETURN TO MUL/DIV. 
F441: A2 04 SWAP LDX 484 INDEX FOR 4-BYTE SWAP. 
F443: 94 FB SYAP] STY F-1,X 
F445: RS F7 LDA X1-1,X SWAP A 8YTE OF EXP/MANT] WITH 
F447: 34 F3 LDY X2-1,X  EXP/MANT2 AND LEAVE A COPY OF 
F449: 94 £7 STY X1-1,X MAST] IN £ (3 3YTES). F+3 USEN 
F443: 95 F3 STA X2-1,X 
F44D: CA DEX ADVANCE INDEX TO NZXT BYTE. 
F44E: DO F3 BNE SWAP] LOOP UNTIL DONE. 
F450: 60 RTS PETURH 
F451: AO 8& FLOAT LDA #SfE INIT EXP1 TO 14, 
F453: 65 FS STA xX) THEN NORMALIZE TO FLOAT. 
F455: AS FY OPM] LOA M1 HIGH-ORDER MANT1 BYTE. 
F457: C¥ CO Cie 8 6#SCO0 UPPER TWO CITS UNEQUAL? 
P459: 30 OC BMI RSI YES, RETURN “ITH MANT1] NORMALIZED 
F458: C6 Fe DEC xl DECREMENT EXP1. 
F45D: U6 FP ASL 1142 
P45F: 26 Fa RCL “141 SHIeT MANT] (3 BYTES) LEFT. 
F461: 26 F9 ROL Ml 
F463: AS F8 NORM LpA Xl EXP] ZERO? 
F465: DO EE BNE WORM] NO, CONTINUE NORMALIZING. 
F467: 60 RTS1 PTS RETURN. . 
F468: 20 A4 F4 FSUB JSR FCOMPL CMPL MANT1,CLEARS CARRY UNLESS 0 
F46B: 20 7B F4 SWPEALGN JSR ALGNSWP RIGHT SHIFT MANT1 OR SWAP WITH 
F46E: A5 F4 FACD LDA x2 
F470:.C5 F8 CMP x? COMPARE FXP] WITH EXP2. 
F472: DO F7 B8NE SWPALGN IF #,SWAP ANDENDS OP ALIGN MANTS., 
F474: 20 25 F4 JSR AND ADU ALIGNED MANTISSAS. 
F477: 50 EA ADDEND BVC NOR” NO OVERFLOW, NORMALIZE RESULT. 
F479: 70 05 BVS RTLOG OV: SHIFT M1 RIGHT, CARRY INTO SIGR 


RARRKRARAKAKKEAHKERAHRKKEKKKEK 


e*eet tee eb ee H ® 


Ss. 


COPYRIGHT 1977 
APPLE COMPUTER INC. 


APPLE=-I1 FLOATING 
POINT ROUTINES 


BY 


ALL RIGHTS RESERVED 


WOZNIAK 


e~e ee HOH He HH He OH 


RERKRRAWERKRKEKKERAEKERKREAE 
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F4 
F4 
F4 
F4 


F4 
F4 


03 
F4 


ALGNS4P 
* 


RTAP 
RTLOG 


RTLOGL 


ROR 1 


FNUL 


MULL 


MUL2 


MDEMD 
NOPMX 


FCOMPL 


CO4PL1 


FDIV 


OIvi 


DIVv2 


DIV3 


DIV4 


MD2 


MD3 


OVCHK 
OVFL 


FIX] 
FIX 


FIXRTS 


UNDFL 


BCC 


LDA 
ASL 
INC 
PEC 
LOX 
ROR 
INX 
BNE 
RTS 
JSR 
ANC 
JSk 


SWAP 


COMPLI 
ADDEND 


FIXPTS 


41+2 


FIXRTS 


M141 


FIXRTS 
M1 


#S0 
M1 
14] 
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SWAP IF CARRY CLEAR, 


FLSE SHIFT RIGHT ARITH. 


SICN OF MANT] INTO CARRY FOR 
RIGHT ARITH SHIFT. 

INCR X1 TO ADJUST FOR RIGHT SHIFT 
EXP] OUT OF RANGE. 

INDEX POR 6:RYTE RIGHT SHIFT. 


TEXT BYTE OF SHIFT. 

LOOP UNTIL DONE. 

RETURN. 

ABS VAL OF MANT1, MANT2. 

ADC EXP] TO EXP2 FOR PRODUCT EXP 
CHECK PROD. EXP AND PREP. FOR MUL 
CLEAR CARRY FOR FIRST BIT. 

M2 AND E& RIGHT (PROD AND MPLIEP) 
IF CARRY CLEAP, SKIP PARTIAL PFPOD 
ADC NULTIPLICAND TO PRODUCT. 
NeXT “OL ITERATION, 

LOOP UNTIL DONE. 

TEST SIGN LSS. 

IF EVEN,NORMALIZE PROD,ELSE COMP 
SET CARRY FOR SUBTRACT. 

INDEX FOR 3-RBYTE SUBTRACT. 

CLEAP A. 

SUBTRACT PYTE OF EXP1. 

RESTORF IT. 

NEXT 4ORE SIGNIFICANT BYTE. 

LOOP UNTIL NONE. 

NOPMALIZE (OR SHIFT RT IP OVFL). 
TAKE ABS VAL OF MANT1, MANT2. 
SUBTRACT EXPl1 FROM EXP2. 

SAVE AS QUOTIENT EXP. 

SET CARRY FOR SUBTRACT. 

INDEX FOR 3-PYTE SUBTRACTION. 


SUBTRACT A BYTE OF E FROM MANT2, 
SAVE ON STACK. 
NEXT MORF SIGNIFICANT BYTE. 


LOOP UNTII. DONE. 
INDEX FOR 3=-BYTE CONDITIONAL MOVE 


PULL BYTF OF DIFFERENCE OFF STACK 
IF M2<E THEN DON'T RESTORE M2. 


NEXT LESS SIGNIFICANT BYTE. 
LOOP UNTIL DONE. 


ROLL OUOTIENT LEFT,CARRY INTO LSB 


SHIFT DIVIDEND LEFT. 


OVFL IS DUE TO UNNORMED DIVISOR 
NEXT DIVIDE ITERATION. 

LOOP UNTIL DONE 23 ITERATIONS. 
NORM. QUOTIENT AND CORRECT SIGN. 


CLEAR MANT1] (3 BYTES) FOR MUL/DIV. 


IF CALC. SET CARRY,CHECK FOR OVFL 
IF NEG THEN NO UNDERFLOW. 
POP ONE RETURN LEVEL. 


CLFAR Xl AND RETURN. 

COMPLEMEET SIGN SIT OF EXPONENT. 
STORE IT. 

COUNT 24 ¥4UL/23 DIV ITERATIONS 
RETUEPN. 

IF POSITIVE EXP THEN NO OVFL. 


F689: 
F68C: 
FOs8D: 
FO6O8Fs: 
F690: 
F692: 
F695: 
F698: 
FO9A: 
F69C: 
FO9E: 
F6A0s 
F6A1: 
F6A33 
F6A5:3 
F6A7: 
F6AS8; 
F6A9: 
F6AA: 
F6AC: 
FOAE: 
F6B03 
FOBl: 
F6B2: 
F683: 
F684: 
F6B7: 
F6BS8: 
F6B9: 
FOBPB: 
FO63Ds: 
FOEFs 
F6C2: 
FOC3: 
F6C5: 
F6C6: 
F6C7s: 
F6CS8: 
F6C9: 
FO6CC: 
F6CF: 


3F 
1e 


F6 
F6 


C6 


00 


RARAAKHAKARKEKEARKERARAAHRERR 


a 


* APPLE-II PSEUCO 


* MACHINE INTERPRETER 


* 


COPYRIGHT 


1977 


APPLE COMPUTER INC 


S 


WOZNTAK 


t 
* 
* 
* ALL RIGHTS RESERVED 
* 
* 
* 


ee eee Fe He He DS 


* 


KRHHRRAREKRERERAKARKKKEKEK 
“SWEETI16 INTERPRETER" 


TITLE 


ROL 
ROW 
R14A 
R1SL 
R15H 


S16PAG 


SAVE 


RESTORE 


S:/16 


Swlos 


SW16C 


S165 


RTUZ 


SET2Z 


EPZ 
EPZ 
CPZ 
EPZ 
EZ 
EOU 
EQU 
EQU 
URG 
JSR 
PLA 
STA 
PLA 
STA 
JSP 
JMP 
THC 
BNE 
INC 
LDA 
PHA 
LUY 
LDA 
AND 
ASL 
TAX 
LSR 
EOR 
SEQ 
STX 
_LSR 
LSR 
LSR 
LAY 


LNA 
PHS 


PTS 
IKC 
SNE: 
Ic 
LOA 
PHA 
LDA 
LSF 
ETS 
PLA 
ELA 
JSR 
JuP 
LDA 


F159 
St16C 
SH16E 
RISL 
Sw16D 
R159 


#S16PAG 


#S0 


(RI5L) ,¥ 


#SF 
A 


A 


(R15L),Y 


TOER 
R148 
A 
A 
A 


PRESERVE 6502 REG CONTENTS 


INIT SWEET16 PC 
FROM RETURN 
ANDRESS 
INTERPRET AND EXECUTE 
OWE SWEETI16 INSTR. 


INCP SYEET16 PC FOR FETCH 


PUSH ON STACK FOR RTS 


FETCH INSTR 

MASK RFG SPECIFICATION  . 
DOUBLE FOR 2-8YTE REGISTERS 
TO X=REG FOR INDEXING 


NOV FAVE COPCODE 
IF 2&RO TREN NON-REG OP 
INDICATE’ PRIOR RESULT REG‘ 


OPCOfE*2 TO LSP'S 


TO Y-nEG FOR INDEXING 


CPTSL<-2,Y LOW-OPDFR ADR YTE 


PISL 
LOR RZ 
PS 


PETE, & 


214H 
rN 


RESTORE 


(R15) 


ONTC STACK 
GOTO REG@-OP POUTIENE 


INCR PC 


LOW-ORDFR ADP EYTE 
ONTO STACK FOR KON=RFG OP 
‘PRIOR RESULT PEG' INDEX 
PREPARE CARRY FOR RBC, BNC. 
GCTO WON-PEG OP ROUTINE 
FOP RETURN ADNRESS 


RESTORF 6502 REG CONTENTS 
PETURN TO 6502 CCDE VIA PC 


(R15L),Y HIGH-ORDER BYTE OF CONSTAUT 
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F? 


F? 


F? 


F7 
F7 


SET 
LD 
BK 


ST 


POP2 


POP3 


LDDAT 


STDAT 


STA 
OFY 
LDA 
sTa 
TYA 
SEC 
ADC 
STA 
BCC 
Iwc 
RTS 
PEP 
DFE 
DPR 
DFP 
DFP 
DFR 
OFB 
DF# 
DFR 
DFB 
DFB 
DFP 
DFB 
DFE 
DFe 
DFB 
DFR 
DFE 
DFB 
DFR 
DFB 
DFB 
DFB 
DFB 
DFS 
DFB 
DFB 
DFB 
DFB 
DFR 
DFB 
DFE 
BPL 


LDA 
EQU 
STA 
LDA 
STA 
RTS 
LDA 
STA 
LDA 


STA 
RTS 


LDA 
STA 
LDY 
STY 
INC 
SNE 
INC 
RTS 
LDA 
STA 
LDY 
STY 
BEN 
LDY 
BEO 
JSR 
LDA 
TAY 
JSR 
LDA 
STA 
STY 
LDY 
STY 
RTS 
JSR 
LDA 
STA 
JMP 
JSR 


ROH,X 


(R15L),¥ LOW-ORDER BYTE OF CONSTANT 


ROL,X 


P15L 
R1L5t 
SET2 
R154 


SET-1 
RTN-] 
LO-1 
cR-] 
ST-1 
BNC-] 
LDAT-] 
8C-] 
STAT=1 
BP-] 
LDDAT=-1 
BM] 
STDAT-] 
RZ—] 
pOP=-] 
3NZ-] 
STPAT=] 
BMl-1 
ADD-1 
BNYl-] 
SU3-1 
RK-1 


POPD-1 


RPS-1 
CPR-1 
3S-1 
INR=] 
NUL=-1 
DCR=-1 
NUL=1 
NUL=1 
NULel 
SETZ 
ROL,X 
#-] 
ROL 
ROH ,X 
ROH 


ROL 
ROL,X 
ROH 
ROH ,X 


ROL 
(ROL,X) 
#$0 
R144 
ROL,X 
INR2 
ROH ,X 


(ROL,X) 
ROL 


#$0 
ROH 


STAT3 


#$0 
POP2 


DCR 
(ROL,X) 


DCP 
(ROL,X) 
ROL 
ROL 
#$0 
R14H 


LDAT 
(ROL,X) 
ROW 
INR 
STAT 
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Y-REG CONTAINS 1 
AND 2 TO PC 


(E) 
(UNUSED) 
(F) 


ALWAYS TAKEN 


MOVE RX TO RO 


MOVE RO TO RX 


STORE BYTE INDIRECT 
INDICATE RO IS RESULT REG 
INCR RX 


LOAD INDIRECT (RX) 
10 RO 


ZERO WIGH-ORDER RO SYTE 
ALWAYS TAKEN 

HIGH ORNER BYTF = 0 
ALWAYS TAKEN 

DECR RX 

POP HIGH-ORDER BYTE @RX 
SAVE IN Y-REG 

DECR RX 

LOW-ORDER BYTE 

TO RO 


INDICATE RO AS LAST RSLT REG 


LOW-ORDER BYTE TO RO, 
HIGH-ORPER BYTE TO RO 


INCR 84 
STORE IWDIRECT LOW-ORDER 


INCR RX 


F7553 
F757: 
F759: 
F75C: 
FU75Fs: 
F761: 
F763: 
F766: 
F768: 
F76A: 
F76C: 
F76E: 
Fv 6F: 
F771: 
F772: 
F774: 
F776: 
F779: 
F77B: 
F77D: 
F780: 
F781: 
F783: 
F785: 
F786: 
F788: 
Fv 8A: 
F78Cs 
F78E: 
F790: 
F792: 
F794: 
F796: 
F799: 
F79B: 
FI79E: 
F79F: 
F7Al1: 
F7A3: 
F7A5S: 
F7A6: 
F7A8: 
F7AA: 
F7ABs 
F7AD: 
FUAF: 
F7B0: 
F7B2: 
F7B33 
F7B4: 
F7B5S:3 
FI7B?2: 
F7B9: 
F7BA: 
F7Bas: 
F7BC: 
F7BE: 
F7CO: 


F7Cl: 
F7C2: 
F7C3: 
F7CS5S:3 
F7C7: 
F7C9: 
F7CAs: 
F7CBs 
F7CC: 
F7CE: 
F7DO: 
F7D2: 


F7D3: 


F7D4:3 
F7DS: 
F7D7: 
F7D9: 
F7DB: 
F7DD: 
F7DE: 
F7DF: 
F7EO: 
F7JE2: 
FTJE4: 
F7E6: 
F7E8: 
FVEQ: 


F; 


. 00 


00 


F? 


STPAT 


SUB2 


ADD 


BS 


BR 
BNC 
BR1 


BR2 


SNC 2 
BC 


3P 


Br 


RZ, 


PilZ, 


BM1 


BNM1 


NUL 
RS 


LDA 


STA 
JMP 
JSR 
LNA 
ST4 
J‘P 
LDA 
PNE 
DEC 
DEC 
RTS 
LDY 
SEC 
LDA 
SBC 
STA 
LDA 
SBC 
STA 
TYA 
ADC 
STA 
RTS 
LDA 
ADC 
STA 
LDA 
ADC 
LDY 
BEQ 
LDA 
JSR 
LDA 
JSR 
CLC 
ECS 
LDA 
SPL 
DEY 
ADC 
STA 
TYA 
ADC 
STA 
RTS 
BCS 
RTS 
ASL 
TAX 
LDA 
BPL 
RTS 
ASL 
TAX 
LDA 
BMI 
RTS 
ASL 
TAX 
LCA 
OR4A 
CEC) 
RTS 
ASL 
TAX 
LDA 
ORA 
BNE 
RTS 
ASL 
TAX 
LDA 
AND 
EOR 
BEQ 
RTS 
ASL 
TAX 
LDA 
AND 
EOR 
BNE 
RTS 
LOX 


ROD 


(ROL,X) 


INR 
NCE 
ROL 


(ROL,X) 


POP 3 
ROL,X 
DCR2 
ROH,x 
ROL,X 


#S0 


ROL 
ROL,X 
ROL,Y 
ROH 
ROH ,X 
ROH,Y 


#$0 
R148 


ROL 
ROL,X 
ROL 
ROH 
ROH,X 
#$0 
SUB2 
R15L 
STAT2 
R15d 
STAT2 


BNC 2 


(R15I-),¥ 


RR2 


RYTE AND INCR RX. THEN 
STORE HIGH-ORDER BYTE. 
INCR R¥ AND RETURN 

DECR FX 


STORE FO LOW B8YTE @RX 
INDICATE RO AS LAST RSLT REG 


DECR PX 


RESULT TO RO 
NOTE Y-REG = 13*2 POR CPR 


RO-RX TO RY 


LAST RESULT. REG*2 
CARRY TO LSB 


RO+RX TO RO 


RO FOR RESULT 
FINISH ADD 


NOTE X=-REG IS 12*2! 
PUSH LOW PC BYTE VIA R12 


PUSH HIGH=-ORDER PC BYTE 


NO CARRY TEST 
DISPLACEMENT BYTE 


ADD TO PC 


LOUELE RKRESULT=PEG INDEX 
TO X-REG FOR INDEXING 
TEST FOR PLUS 

RRANCH IF SO 


DOUBLF RESULT-FEC INDEX 


TEST FOR MINUS 


DOURLE RESULT=-FREG INDEX 


TUST FOR ZERO 
(80TH PYTES) 
PRAVCH IF SO 
DOUPLO RESULT<$REC INDEX 
TEST FOR NOWZERO 
(BOTH BYTES) 
BRANCH IF SO 
DOUBLE RESULT=-REG INDEX 


CHECK BOTH BYTES 
FOR S$FF (MINUS 1) 


BRANCH IF SO 


DOUBLE RESULT=-REG INDEX 


CHECK BOTH BYTES FOR NO SFF 
RRANCH IF NOT MINUS 1 
12*2 FOR R12 AS STK POINTER 


F7EB: 
FVEE: 
F7FO: 
FUF2: 
FT7FS5: 
F7F7: 
F7F9: 
FUFA: 


20 
Al 
85 
20 
Al 
85 
60 
4c 


66 F? 
00 


1F 


66 F? 
00 


1E 
C7 F6 RTN 


JSR 
LDA 
STA 
JSR 
LDA 
STA 
RTS 
JP 


DCR 
(ROL,X) 
R15# 
DCR 
(ROL,X) 
R15L 


RTNZ 


99 


DECR STACK POINTER 
POP HIGH RETURN ADR TO PC 


SAME POR LOW-ORDER BYTE 


6502 MICROPROCESSOR INSTRUCTIONS 


ADC 


AND 
ASL 


BCC 
BCS 
8EQ 
BIT 


BMI 
BNE 
BPL 
BRK 
BVC 
BVS 


CLC 
CLD 
CLI 
CLV 
CMP 
CPX 
CPY 
DEC 
DEX 
DEY 


EOR 


INC 
INX 
INY 
JMP 
JSR 


Add Memory to Accumulator with 
Carry 

“AND” Memory with Accumulator 
Shift Left One Bit (Memory or 
Accumulator) 


Branch on Carry Clear 
Branch on Carry Set 
Branch on Result Zero 
Test Bits in Memory with 
Accumulator 

Branch on Result Minus 
Branch on Result not Zero 
Branch on Result Plus 
Force Break 

Branch on Overfiow Clear 
Branch on Overfiow Set 


Clear Carry Flag 

Clear Decimal Mode 

Clear Interrupt Disable Bit 

Clear Overflow Fiag 

Compare Memory and Accumulator 
Compare Memory and Index X 
Compare Memory and Index Y 
Decrement Memory by One 
Decrement Index X by One 
Decrement Index Y by One 


“Exclusive-Or” Memory with 
Accumulator 


Increment Memory by One 
increment Index X by One 
increment Index Y by One 
Jump to New Location 

Jump to New Location Saving 
Return Address 


100 


LOA 
Lox 
LDY 
LSR 


NOP 
ORA 


PHA 


PHP 
PLA 
PLP 


ROL 


ROR 


RTI 
RTS 


-SBC 


SEC 
SED 
SEI 

STA 
STX 


Load Accumulator with Memory 
Load Index X with Memory 
Load Index Y with Memory 
Shift Right one Bit (Memory or 
Accumulator) 


No Operation 
“OR" Memory with Accumulator 


Push Accumulator on Stack 
Push Processor Status on Stack 
Pull Accumulator from Stack 
Pull Processor Status from Stack 


Rotate One Bit Left (Memory or 
Accumulator) 

Rotate One Bit Right (Memory or 
Accumulator) 

Return from Interrupt 

Return from Subroutine 


Subtract Memory from Accumulator 
with Borrow 

Set Carry Flag 

Set Decimal Mode 

Set Interrupt Disable Status 

Store Accumulator in Memory 
Store index X in Memory 

Store Index Y in Memory 


Transfer Accumulator to Index X 
Transfer Accumulator to index Y 
Transfer Stack Pointer to Index X 
Transfer Index X to Accumulator 
Transfer index X to Stack Pointer 
Transter index Y to Accumulator 


< 


<pyrres aoe | cH VMZX> 


"9332 
a 


THE FOLLOWING NOTATION 
APPLIES TO THIS SUMMARY: 


Accumulator FIGURE 1. ASL-SHIFT LEFT ONE BIT OPERATION 
Index Registers 


Memory fehy7iel{sis}sf{2{+fohfo 
Borrow 


Processor Status Register 


Stack Pointer FIGURE 2. ROTATE ONE BIT LEFT (MEMORY 
Change OR ACCUMULATOR) 

No Change 

Add 


subtract 7lels}e}s[2]+[o- ye! 
Subtract 


Logical Exclusive Or 

Transfer From Stack 

Transter To Stack FIGURE 3. 
Transfer To 
Transfer To 
Loge! O Ee AEE 
Program Counter 

Program Counter High 


Program Counter Low NOTE 1: BIT — TEST BITS 
Operand 
Immediate Addressing Mode Bit 6 and 7 are transferred to the status register. If the 


result of A A M is zero then Z=1, otherwise Z=0. 


PROGRAMMING MODEL 


7 0 

[a )secumuaron 
7 0 

[7 ) nex nesisren 
7 0 
[x } nex necisren 
7 0 

PCH PCL PROGRAM COUNTER 

7 0 


Co] } stack pomren 


PROCESSOR STATUS REGISTER, “P” 


CARRY 

ZERO 

INTERRUPT DISABLE 
DECIMAL MOCE 
BREAK COMMAND 
OVERFLOW 
NEGATIVE 
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dON — ce 
A ‘(98s1Ipul) — GNVY — LE 
ine — 0€ 
dON — 42 


ainjosqy — 10 


eynjosqy — OGNV — Gz 


eynjosqy — LIG 
dON 

s0}ejNWNDDY — 104 
eeipeww) — AGNYV 
dd 

dON 

e6eg 0107 — 10 
e6eq 0187 — ONV 
e6eyg 0187 — LID 
dON 

dON 

(x “yoesIpul) — ONY 
usr 

dON 

X ‘einjosqy — Sv 
xX ‘enjosqy — vVHO 
dON 

dON 

dON 

A ‘aynjosqy — vuO 
019 

dON 

x ‘e68g 0107 — 1S¥ 
x ‘68g 0107 — YHO 
dON 

dON 

dON 

A ‘(esipul) — WHO 
dd 

dON 

ainjosqy — 1SVv 
aInjosqy — VHO 
dON 

dON 

sORBINWNIIY — IS¥ 
a1eIpewwi — vHO 
dHd 

dON 

e6eg 0107 — 1Sy 
26eq 0187 — WHO 
dON 

dON 

dON 

(X “yespul) — YHO 
Yue 


— 92 


— az 
—w2 
— 62 
— 92 
—l2 
— 92 
— sz 
— vz 
— 
—2z 
— 12 
— 02 
— dt 
— 3 
—a 
—oL 
— a 
—vi 
— 6 
— eo 
—at 
— 9 
— St 
— vt 
— ct 
— Zz 
— tt 
— OL 
— 40 
— 30 
— ao 
—90 
— 90 
— vo 
— 60 
— 80 
— 20 
— 90 
— $0 
— 0 
— £0 
— 20 
— 10 
— 00 
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GETTING STARTED WITH YOUR APPLE II BOARD 


INTRODUCTION 


ITEMS YOU WILL NEED: 


Your APPLE II board comes completely assembled and thoroughly tested. 
You should have received the following: 


a. 1 ea. APPLE II P.C. Board complete with 
specified RAM memory. 


b. 1 ea. d.c. power connector with cable. 
c. 1 ea. 2" speaker with cable. 
d. 1 ea. Preliminary Manual 


e. lea. Demonstration cassette tapes. (For 4K: 1 cassette (2 proarams); 
16K or greater: 3 cassettes. 

f. 2 ea. 16 pin headers plugged into locations A7 
and J14. 


In addition you will need: 
g. Accolor TV set (or B & W) equipped with a direct 
video input connector for best performance or a com- 
mercially available RF modulator such as a "Pixi-verter" ™ 
Higher channel (7-13) modulators generally provide 
(6) system performance than lower channel modulators 
-6). 


h. The following power supplies (NOTE: current ratings 
do not include any capacity for peripheral boards.): 


1. +12 Volts with the following current capacity: 
a. For 4K or 16K systems - 35QmA. 
b. For 8K, 2QK or 32K ~ 550mA. 
c. For 12K, 24K, 36K or 48K - 85@mA. 
2. +5 Volts at 1.6 amps 
3. -5 Volts at 1QmA. 
4. OPTIONAL: If -12 Volts is required by your keyboard. 


(If using an APPLE II supplied keyboard, you will 
need -12V at 50mA.) 
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An audio cassette recorder such as a Panasonic model 
uy RQ- 309° DS. which 1s used to’ load and save programs. 


j. An ASCII encoded keyboard ecu'ipped with a "reset" 
,  , Switch. 


k. Cable. for the following: 
1. Keyboard to APPLE IT P.C.B. 
2. Video. out 75 ohm cable to..TV or, modulator 
3. Cassette to APPLE II P.C.B. (1 or, 2) 
Ontionally you may desire: 


1. Game paddles or pots with cables to APPLE II Game. I/0 
/ connector, (Several demo ) programs use PDL(O) and .. 
"Pong" .also yses PRDL(}). . 


(oda 


m Case to hold all the above 


Final Assembly Steps 


1. Using detailed information on pin functions in hardware 
_ section of manual, connect power | supplies to d.c. cable 
VM assembly. ‘Use both ground wires to miminize resistance. 
‘With cable'assembly disconnected frém APPLE II “mother 
board, turn on power supplies and verify voltages on 
_,_ connector pins. Improper supply connections such as re- 

io tense polarity can severely damage your APPLE IT. 


4: ° 
you ' b 


2." Connect keyboard: to APPLE tL by unplugging leader in 
' Tocation A7 ‘and wiring keyboard: cable to it, then plug 
' back into APPLE II P.C.B. 


3, Plug ih’ speaker cable. | 

4. Optionally connect one or two game paddles using leader 
supplied in socket located at J14. 

5. Connect video cable. a 


6. Connect cable from cassette monitor output to APPLE II 
cassette input. 


7. Check to see that APPLE II board is not contacting any 
conducting surface. 


8. With power supplies turned off, plug in power connector 
to mother board then recheck all cableing. 
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POWER UP 


1. Turn power on. If power supplies overload, immediately turn off 
and recheck power cable wiring. Verify operating supply voltages 
are within +3% of nominal value. 


2. You should now have random video display. If not check video 
level pot on mother board, full clockwise is maximum video out- 
put. Also check video cables for opens and shorts. Check 
modulator if you are using one. 


3. Press reset button. Speaker should beep and a "“*" prompt 
‘character with a blinking cursor should appear in lower 
left on screen. 


4. Press "esc" button, release and type a "@" (shift-P) to 
clear screen.. You may now try "Monitor" commands if you 
wish. See details in "Monitor" software section. 


RUNNING BASIC 


1. Turn power on; press reset button; type "control B" and press 
return button. A ">" prompt character should appear on screen. 
indicating that you are now in BASIC. 


2. Load one of the supplied demonstration cassettes into recorder. 
Set recorder level to approximately 5 and start recorder. Type 
"LOAD" and return. First beep indicates that APPLE II has found 
beginning of program; second indicates end of program followed 
by ">" character on screen. If error occurs on loading, try a 
different demo tape or try changing cassette volume level. 


3. Type RUN and carriage return to execute demonstration program. 


Listings of these are included in the last section cf this 
manual. 
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THE APPLE II SWITCHING POWER SUPPLY 


Switching power supplies generally have both advantages and peculiarities 
not generally found in conventional power supplies. The Apple II user 
is urged to review this section. 


Your Apple II is equipped with an AC line 
voltage filter and a three wire AC line cord. 
It is important to make sure that the third . 
wire is returned to earth ground. Use a con- 
tinuity checker or ohmmeter to ensure that 
the third wire is actually returned to earth. 
Continuity should be checked for between the 
power supply case and an available water pipe 
for example. The line filter, which is of a 
type approved by domestic (U.L. CSA) and 
international (VDE) agencies must be returned 
to earth to function properly and to avoid 
potential shock hazards. 


_ The APPLE II power supply is of the "flyback" switching type. In 
this system, the AC line is rectified directly, "chopped up" by a high 
frequency oscillator and coupled through a small transformer to the 
diodes, filters, etc., and results in four low voltage DC supplies to 
run APPLE II. The transformer isolates the DC supplies from the line 
and is provided with several shields to prevent “hash" from being 
coupled into the logic or peripherals. In the "flyback" system, the 
energy transferred through from the AC line side to DC supply side is 
Stored in the transformer's inductance on one-half of the operating 
cycle, then transferred to the output filter capacitors on the second 
half of the operating cycle. Similar systems are used in TV sets to 
provide horizontal deflection and the high voltages to run the CRT. 


Regulation of the DC voltages is accomplished by controlling the 
frequency at which the converter operates; the greater the output power 
needed, the lower the frequency of the converter. If the converter is 
overloaded, the operating frequency will drop into the audible range 
with squeels and squawks warning the user that something is wrong. 


All DC outputs are regulated at the same time and one of the four 
outputs (the +5 volt supply) is compared to a reference voltage with 
the difference error fed to a feedback loop to assist the oscillator 
in running at the needed frequency. Since all DC outputs are regulated 
together, their voltages will reflect to some extent unequal loadings. 
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For example; if the +5 supply is loaded very heavily, then all 
other supply voltages will increase in voltage slightly; conversely, 
very light loading on the +5 supply and heavy loading on the +12 _ 
supply will cause both it and the others to sag lightly. If precision 
reference voltages are needed for peripheral applications, they should 
be provided for in the peripheral design. 


In general, the APPLE II design is conservative with respect to 
component ratings and operating termperatures. An over-voltage crowbar 
shutdown system and an auxilliary control feedback loop are provided 
to ensure that even very unlikely failure modes will not cause damage to 
the APPLE II computer system. The over-voltage protection references to 
the DC output voltages only. The AC line voltage input must be within 
the specified limits, i.e., 197V to 132V. 


Under no circumstances, should more 
than 149 VAC be applied to the input 

of the power supply. Permanent damage 
will result. 


Since the output voltages are controlled by changing the operating 
frequency of the converter, and since that frequency has an upper limit 
determined by the switching speed of power transistors, there then must 
be a minimum load on the supply; the Apple II board with minimum memory 
(4K) is well above that minimum load. However, with the board discon- 
nected, there is no load on the supply, and the internal over-voltage 
protection circuitry causes the supply to turn off. A 9 watt load 
distributed roughly 50-50 between the +5 and +12 supply is the nominal 
minimum load. 


Nominal load current ratios are: The +12V supply load is 4% that of the +5V. 
The - 5V supply load is 1/19 that of the +5V. 
The -12V supply load is 1/19 that of the +5V. 


The supply voltages are +5.9 + 9.15 volts, +11.8 + 9.5 volts, -12.9 + 1V, 
-5.2 + 0.5 volts. The tolerances are greatly reduced when the loads are 
close to nominal. 


The Apple II power supply will power the Apple II board and all present 
and forthcoming plug-in cards, we recommend the use of low power TTL, CMOS, 
etc. so that the total power drawn is within the thermal limits of the entire 
system. In particular, the user should keep the total power drawn by any 
One card to less than 1.5 watts, and the total current drawn by all the cards 
together within the following limits: 


+ 12¥. - use no more than 259 mA 
+ 5V - use no more than 500 mA 
- SV - use no more than 2990 mA 


- 12V. - use no more than 2990 mA 


The power supply is allowed to run indefinetly under short circuit 
or open circuit conditions. 


CAUTION: There are dangerous high 
voltages inside the power supply 
case. Much of the internal circuitry 
is NOT isolated from the power line, 


and special equipment is needed for 
service. NO REPAIR BY THE USER IS 
ALLOWED. 
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NOTES ON INTERFACING WITH THE HOME TV 


Accessories are available to aid the user in connecting the Apple II 
system to a home color TV with a minimum of trouble. These units are called 
“RF Modulators" and they generate a radio frequency signal corresponding to 
the carrier of one or two of the lower VHF television bands; 61.25 MHz 
(channel 3) or 67.25 MHz (channel 4). This RF signal is then modulated with 
the composite video signal generated by the Apple II. 


Users report success with the following RF modulators: 


the "PixieVerter" (a kit) 
ATV Research 

13th and Broadway 

Dakota City, Nebraska 68731 


the "TV-1" (a kit) 
UHF Associates 

6037 Haviland Ave. 
Whittier, CA 90601 


the "Sup-r-Mod" by (assembled & tested) 
M&R Enterprises 

P.O. Box 1011 

Sunnyvale, CA 94088 


the RF Modulator (a P.C. board) 
Electronics Systems 

P.O. Box 212° 

Burlingame, CA 94010 


Most of the above are available through local computer stores. 


The Apple II owner who wishes to use one of these RF Modulators should 
read the following notes carefully. 


All these modulators have a free running transistor oscillator. The 
M&R Enterprises unit is pre-tuned to Channel 4. The PixieVerter and the 
TV-1 have tuning by means of a jumper on the P.C. board and a small trimmer 
capacitor. All these units have a residual FM which may cause trouble if 
the TV set in use has a IF pass band with excessive ripple. The unit from 
M&R has the least residual FM. 


All the units except the M&R unit are kits to be built and tuned by 
the customer. All the kits are incomplete to some extent. The unit from 
Electronics Systems is just a printed circuit board with assembly instructions. 
The kits from UHF Associates and ATV do not have an RF cable or a shielded 
box or a balun transformer, or an antenna switch. The M&R unit is complete. 


Some cautions are in order. The Apple II, by virtue of its color qraphics 
capability, operates the TV set in a linear mode rather than the 106% contrast 
mode satisfactory for displaying text. For this reason, radio frequency inter- 
ference (RFI) generated by a computer (or peripherals) will beat with the 
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carrier of the RF modulator to produce faint spurious background patterns 
(called "worms") This RFI "trash" must be of quite a low level if worms 

are to be prevented. In fact, these spurious beats must be 49 to 5@db 
below the signal level to reduce worms to an acceptable level. When it is 
remembered that only 2 to 6 mV (across 3992) is presented to the VHF input 
of the TV set, then stray RFI getting into the TV must be less than 50uV 

to obtain a clean picture. Therefore we recommend that a good, co-ax 

cable be used to carry the signal from any modulator to the TV set, such 

as RG/59u (with copper shield), Belden #8241 or an equivalent miniature 

type such as Belden #8218. We also recommend that the RF modulator be 
enclosed in a tight metal box (an unpainted die cast aluminum box such as 
Pomona #2428). Even with these precautions, some trouble may be encountered 
with worms, and can be greatly helped by threading the coax cable conn- 
ecting the modulator to the TV set repeatedly through a Ferrite toroid core. 
Apple Computer supplies these cores in a kit, along with a 4 circuit 
connector/cable assembly to match the auxilliary video connector found on 
the Apple II board. This kit has order number A2MQ10X. The M&R "Sup-r-Mod" 
is supplied with a coax cable and toroids. 


Any computer containing fast switching logic and high frequency clocks 
will radiate some radio frequency energy. Apple II is equipped with a 
good line filter and many other precautions have been taken to minimize 
radiated energy. The user is urged not to connect "antennas" to this 
computer; wires strung about carrying clocks and/data will act as antennas, 
and subsequent radiated energy may prove to be a nuisance. 


Another caution concerns possible long term effects on the TV picture 
tube. Most home TV sets have "Brightness" and "Contrast" controls with a 
very wide range of adjustment. When an un-changing picture is displayed 
with high brightness for a long period ,a faint discoloration of the 
TV CRT may occur as an inverse pattern observable with the TV set 
turned off. This condition may be avoided by keeping the "Brightness" 
turned down slightly and "Contrast" moderate. 
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A SIMPLE SERIAL OUTPUT 


The Apple II is equipped with a 16 pin DIP socket most frequently 
used to connect potentiometers, switches, etc. to the computer for 
paddle control and other game applications. This socket, located at 
J-14, has outputs available as well. With an appropriate machine 
language program, these output lines may be used to serialize data in 
a format suitable for a teletype. A suitable interface circuit must 
be built since the outputs are merely LSTTL and won't run a teletype 
without help. Several interface circuits are discussed below and the 
user may pick the one best suited to his needs. 


The ASR - 33 Teletype 


The ASR - 33 Teletype of recent vintage has a transistor circuit 
to drive its solenoids. This circuit is quite easy to interface to, 
since it is provided with its own power supply. (Figure la) It can 
be set up for a 20mA current loop and interfaced as follows (whether 
or not the teletype is strapped for full duplex or half duplex oper- 
ation): 


a) The yellow wire and purple wire should both go to 
terminal 9 of Terminal Strip X. If the purple wire 
is going to terminal 8, then remove it and relocate 
it at terminal 9. This is necessary to change from 
the 60mA current loop to the 20mA current loop. 


b) Above Terminal Strip X is a connector socket identi- 
fied as "2". Pin 8 is the input line + or high; Pin 
7 is the input line - or low. This connector mates 
with a Molex receptacle model 1375 #93-99-2151 or 
#03-09-2153. Recommended terminals are Molex #92-99- 
2136. An alternate connection method is via spade lugs 
to Terminal Strip X, terminal 7 (the + input line) and 
6 (the - input line). 


c) The following circuit can be built on a 16 pin DIP 
component carrier and then plugged into the Apple's 
16 pin socket found at J-14: (The junction of the 
3.3k resistor and the transistor base lead is float- 
ing). Pins 16 and 9 are used as tie points as they 
are unconnected on the Apple board. (Figure la). 
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The "RS - 232 Interface" 

For this interface to be legitimate, it is necessary to twice invert 
the signal appearing at J-14 pin 15 and have it swing more than 5 volts 
both above and below ground. The following circuit does that but requires 
that both +12 and -12 supplies be used. (Figure 2) Snipping off pins 
on the DIP-component carrier will allow the spare terminals to be used for 
tie points. The output ground connects to pin 7 of the DB-25 connector. 
The signal output connects to pin 3 of the DB-25 connector. The "protective" 
ground wire normally found on pin 1 of the DB-25 connector may be connected 
to the Apple's base plate if desired. Placing a #4 lug under one of the 
four power supply mounting screws is perhaps the simplest method. The +12 
volt supply is easily found on the auxiliary Video connector (see Figure S-11 
or Figure 7 of the manual). The -12 volt supply may be found at pin 33 of 
the peripheral connectors (see Figure 4) or at the power supply connector 
(see Figure 5 of the manual). 


A Serial Out Machine Center Language Program 

Once the appropriate circuit has been selected and constructed a machine 
language program is needed to drive the circuit. Figure 3 lists such a tele- 
type output machine language routine. It can be used in conjunction with an 
Integer BASIC program that doesn't require page $309 hex of memory. This 
program resides in memory from $379 to $3E9. Columns three and four of the 
listing show the op-code used. To enter this program into the Apple II the 
following procedure is followed: 


Entering Machine Language Program 


Power up Apple II 


2. Depress and release the "RESET" key. An asterick 
and flashing cursor should appear on the left hand 
side of the screen below the random text matrix. 


3. Now type in the data from columns one, two and three 
for each line from $379 to @3E9. For example, type in 
"370: AQ 82" and then depress and release the "RETURN" 
key. Then repeat this procedure for the data at $372 
and on until you complete entering the program. 


Executing this Program 
1. From BASIC a CALL 889 ($379) will start the execution of 


this program. It will use the teletype or suitable 89 
column printer as the primary output device. 
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2. PR#P will inactivate the printer transfering control 
back to the Video monitor as the primary output device. 


3. In Monitor mode $37@G activates the printer and hitting 
the "RESET" key exits the program. 


Saving the Machine Language Program 


After the machine language program has been entered and checked for 
accuracy it should, for convenience, be saved on tape - that is unless 
you prefer to enter it by keyboard every time you want to use it. 

The way it is saved is as follows: | 


1. Insert a blank program cassette into the tape 
recorder and rewind it. 


2. Hit the "RESET" key. The system should move 
into Monitor mode. An asterick "*" and flash- 


ing cursor should appear on the left-hand side 
of the screen. 


3. Type in "379.Q3E9W 379.Q3E9W". 


4. Start the tape recorder in record mode and depress 
the "RETURN" key. 


5. When the program has been written to tape, the asterick 
and flashing cursor will reappear. 


The Program 


After entering, checking and saving the program perform the following 
procedure to get a feeling of how the program is used: 
1. Bo (control B) into BASIC 


2. Turn the teletype (printer on) 
3. Type in the following 


10 CALL 889 

15 PRINT "“ABCD...XYZ91123456789" 
20 PR#Q 

25 END 


4. Type in RUN and hit the "RETURN" key. The 
text in line 15 should be printed on the 
teletype and control is returned to the key- 
board and Video monitor. 
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Line 19 activates the teletype machine routine and all "PRINT" state- 
ments following it will be printed to the teletype until a PR#9 statement is 
encountered. Then the text in line 15 will appear on the teletype's output. 
Line 29 deactivates the printer and the program ends on line 25. 


Conclusion 

With the circuits and machine language program described in this paper 
the user may develop a relatively simple serial output interface to an ASR-33 
or RS-232 compatible printers. This circuit can be activated through BASIC 
or monitor modes. And is a valuable addition to any users program library. 


2N3906 (OR EQUIV.) 


ISON 


(a) 


FIGURE 1 ASR-33 


+12 (JUMPERED TO +12 SUPPLY) 


2N3906 


470N 
SOUTPUT (+) 


OUTPUT (-) 
2.2K 
lo 


J—-14 
-!2 (JUMPERED TO -I2 SUPPLY) 


2N3904 


FIGURE 2 RS-232 
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(b) 


3:42 P.Mes 


0370: AJ 
0372: 85 
0374: A9 
0376: 85 
0378: A9 
O37A: 85 
037C: AS 
O37E: 8D 
038i: 60 
0382: 48 
0383: 48 
0384: AD 
0387: CS 
03893: 68 
O38A: BO 
O38C: 48 
O38D: AJ 
O38F: 2C 
0392: FO 
0394: EE 
0397: 20 
O39As 68 
0393: 48 
039C: 90 
O39E: 49 
O3A0: OA 
O3SAl: DO 


1171871977 


TELETYPE DRIVER ROUTINES 


SFOR APPLE-II 
sCURSOR HORIZ. 
SCHAR-e OUT SVITCH 


sCOLUMN COUNT LOC. 


SPOINT TO TTY QO0UTINES 
SHIGH BYTE 


3SET “WINDOW WIOTH 

3TO NUMSER COLUMNS ONY 
SVHERE WE ARE NOW. 
sSAVE TWICE 


3ON STACK. 
sCHECK FOR A TAB. 


SRESTORE OUTPIT CHAR. 
sIF C SET, NO TA3 
SPRINT A SPACE. 

sTRICK TO DETERMINE 
31F CONTROL CHAR. 

31F NOTs ADD ONE TO CB 
SPRINT THE CHAR ON TTY 
SRESTORE CHAR 

ZAND PUT BACK ON STACK 
3D0 MORE SPACES FOR Ta 
3CHECK FOR CA® RET. 
SELIM PARITY 


SIF NOT CRs DONE. 


l TITLE *TELETYPe DRIVER ROIJTINES® 
2 KEKE KEKKEKARKEEKEKEREE SE 
3 * * 
4 * TTYDRIVeER: 
5 * TELETYPe OJTPIT * 
6 * ROUTINE FOR 72 * 
7 * COLJMN PRINT WITH «* 
g * SASIC LIST * 
9 * * 
10 *x COPYRIGHT 1977 BY: * 
11 * APPLE COMPUTER INC. * 
l2 * Li7 18/77 x 
13 * * 
14 * Re WIGGINTON x 
15 * Se. WOZNIAK * 
16 * * 
17 PES ELLE LES ESP EL ET SESS ET ES 
18 WNDWDTH EQU $21 
19 CH EQU 324 
20 CSVWL EQU $36 
21 YSAVE EQJ $778 
22 COLCNT EQU 37F8 
23 MARK EQU $C0S8 
24 SPACE EQJ $CO05S9 
25 WAIT EQ SFCA8 
26 ORG $370 
***WARNING: OPERAND OVERFLOW IN LINE 27 

27 TTINITs LDA #TTOUT 
28 STA CSVWL 
29 LDA #TTOUT/25§ 
30 STA CSWL+! 
31 LDA #72 
32 STA YWNDWDTH 
33 LDA CH 

07 34 STA COLCNT 
35 RTS 
36 TTOUTs PHA 
37 PHA 

07 38 TTOUT2: LDA COLCNT -« 
39 CMP CH 
40 PLA 
41 BC TESTCTRL 
42 PHA 
43 LDA #3A0 

O03 44 TeSTCTRL: s3IT RTS! 
45 BEQ PRNTIT 

07 46 INC COLCNT 

03 47 PRNTITs JSR DOCHAR 
48 PLA 
a9 PHA 
50 BCC TTOUT2 
S51 EQOR #30D 
S52 ASL A 
53 BNE FINISH 

FIGURE 3a 
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TELETYPE DRIVER, ROUTINES 


3:42 PeMes 11713871977 out PAGE? 2 
03A3: 8D F8 07 54 STA COLCNT SCLEAR COLUMN COUNT 
03A6: A9 BA 55 LDA #38A sNOW DO LINE FEED 
O3A8: 20 Cl 03 S6 JSR DOCHAR 
O3AB: A9 58 57 LDA #$53 | _ 
O3AD: 20 A8 FC 58 JSR WAIT 3200MSEC DELAY FOR LIB 
0380: AD F8 07 59 FINISH: LDA COLCNT SCHECK IF IN MARGIN 
03B3: FO 08 60 BEQ S=TCH 3FOR CR», RESET CH 
03385: E5 21 61 SBC WNDWDTH SIF SOs CARRY SET. 
0337: E9 FT 62 S38C #$8F7 7 
0389: 90 04 63 BCC RETURN 
0383: 69 IF 64 ADC #SIF sADJIST CH 
O3BD: 85 24 65 SéETCH: STA CH 
O33F: 68 66 RETURN: PLA 
O3C0: 60 67 RTSI: RTS SRETURN TO CALLER 

68 * HERE IS THE TELETYPE PRINT A CHARACTER ROUTINE: 
O3Ct: 8C 78 07 69 #DOCHAR: STY YSAVE 
O3C4: 08 70 PHP 3SAVE STATUS. 
03C5: ‘AO OB 71 LDY #803 sUt 3ITS Ct START. 3 BR 
O3C7: 18 72 CLC 33EGIN YITH SPACE (STR 
O3C8: 48 73. TTOUT3: PHA 3SAVE A REG AND SET FOB 
0309: BO 05 74 BCS MARKOUT 
03C3: AD 59 CO 75 LDA SPACz 3SEND A SPACE 
O3CE: 90 03 76 BCC TTOUT4 
O3D0: AD 58 CO 77 #£xMARKOUT: LDA MARK 3SEND A MARK 
O3D3: A9 D7 78 TTOUT4: LDA #$D7 SDELAY 9.991 MSEC FOR 
O3D5: 48 79 =DLYIL: PHA 3110 BAUD 
03D6: A9 20 80 LDA #3%20 
O3D8: 4A 81 DLY2: LSR A 
03D9: 90 FD B2 BCC DLY2 
O3D3: 68 83 PLA 
O3DC: £9 Ol 84 S3C #S0l 
O3DE: DO FS 85 3NE DLYI 
O3E0: 68 36 PLA 
O3Et: 6A 37 ROR A sNEXT BIT CSTOP SITS ® 
O3E2: 88 88 DEY LOOP Itt 3ITS. 
O3E3: DO E3 89 BNE TTONT3 
O3ES: AC 78 07 90 LDY YSAVE SRESTORE Y-REG. 
O3E8: 28 91 PLP SRESTORE STATUS 
O3E9: 60 92 RTS 3 RETIN 


kKKKKKKKKSUCCESSFUL ASSEMBLY: NO ERRORS 


FIGURE 3b 
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CROSS-REFERNCE:s 


TESTCTRL 
TTINIT 
TTOUT 
TTOUT2 
TTOUTS3 
TTOUT4 
WAIT 
WNDWDTH 
YSAVE 
ILE: 


0024 
O7F8 
0036 
03D5 
03D8 
03C1 
0380 
C058 
03D0 
0397 
O3BF 
03C0 
033D 
C059 
O33F 
0370 
0382 
0384 
03C8 
03D3 
FCA8 
0021 
07768 


TELETYPE DRIVER ROUTINES 


0033 0039 0065 


0034 0038 0046 0054 0059 
0028 0030 


0oss 
0082 
0047 
0053 
0077 
0074 
0045 
0063 
0044 
0060 
0075 
0041 


0027 
0050 
0089 
0076 
0058 
0032 
0069 


FIGURE 3c 


0056 


0029 


0061 
0090 
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INTERFACING THE APPLE 


This section defines the connections by which external devices are 
attached to the APPLE II board. Included are pin diagrams, signal 
descriptions, loading constraints and other useful information. 


TABLE OF CONTENTS 


1. CONNECTOR LOCATION DIAGRAM 
2. CASSETTE DATA JACKS (2 EACH) 

3. GAME I/0 CONNECTOR 

4. KEYBOARD CONNECTOR 

PERIPHERAL CONNECTORS (8 EACH) 
POWER CONNECTOR 

SPEAKER CONNECTOR 

VIDEO OUTPUT JACK 

AUXILIARY VIDEO OUTPUT CONNECTOR 


oO wo “NY DD OF 
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Figure 1A APPLE II Board-Complete View 
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Figure 1B Connector Location Detail APPLE Il PC BOARD 
TOP VIEW CASSETTE DATA IN 
CASSETTE DATA OUT 
PERIPHERALS 
| 
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Front Edge of PC Board 


CONNECTOR LOCATIONS 


124 


CASSETTE JACKS 


A convenient means for interfacing an inexpensive audio cassette 
tape recorder to the APPLE II is provided by these two standard 
(3.5mm) miniature phone jacks located at the back of the APPLE II 
board. 


CASSETTE DATA IN JACK: Designed for connection to the "EARPHONE" 

T Output found on most audio cassette tape recorders. 
ViN=1Vpp (nominal), Zt yr l2k Ohms. Located at K12 as illustrated in 
Figure 1. 


CASSETTE DATA OUT JACK: Designed for connection to the "MIC" or 
"MICROPHONE" input found on most audio cassette tape recorders. 

=25 mV into 100 Ohms, Loy z= | 80 Ohms. Located at K13 as illustrated 
if Figure 1. 


GAME I/0 CONNECTOR 
The Game I/0 Connector provides a means for connecting paddle controls, 
lights and switches to the APPLE II for use in controlling video games, 


etc. It is a 16 pin IC socket located at J14 and is illustrated in 
Figure | and 2. 


Figure 2 GAME I/O CONNECTOR 


TOP 
( Front Edge oP PC Board 


+5V 17 16 NC. 
SWO 2 75 ANO 
SW1 3 14° AN1 
Sw2 4 13° AN2 
CO40STB 5 72 ANS 
PDLO 6 77. POL3 
PDOL2 7 70 PDL1 
GND 8 9 NC. 
LOCATION J14 
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SIGNAL DESCRIPTIONS FOR GAME 1/0 


ANQ-AN3: 8 addresses (CQ58-CQ5F) are assigned to selectively 
"SET" or "CLEAR" these four. "ANNUNCIATOR" outputs. 
Envisioned to control indicator lights, each is a 
74LSxx series TTL output and must be buffered if used 


to drive lamps. 


CQ40 STB: A utility strobe output. Will go low during 92 of a 
read or write cycle to addresses CQ4Q-CQ4F. This is 


a 74LSxx series TTL output. 
GND: System circuit ground. 0 Volt line from power supply. 


NC: No connection. 


| i - jiable 

-PDL3: Paddle control innuts. Requires a )-159K ohm varia 
Pole resistance and +5Y for each paddle. Internal 19% ohm 
resistors are provided in series with external pot to 
prevent excess current if pot goes completely to zero 


ohms. 


SWO-SW2: Switch inputs. Testable by reading from addresses 
C061-C@63 (or C@69-CG6B). These are uncommitted 
74LSxx series inputs. 


+5V: Positive 5-Volt supply. To avoid burning out the connector 
pin, current drain MUST be less than 100mA. 


KEYBOARD CONNECTOR 


This connector provides the means for connecting as ASCII keyboard 
to the APPLE II board. It is a 16 pin IC socket located at A/ and is 
illustrated in Figures 1] and 3. 


Figure 3 KEYBOARD CONNECTOR 
TOP VIEW 


( Front Edge of PC S8oard) 
+5V 17 16 N.C. 
STROBE 2 15 —12V 
RESET 3 14 NC. 
N.C. 4 13 B2 
Be 5 12 Bi 
BS5 6 17 B4 
B7 7 10 B3 
GND 8 9 NC. 
LOCATION A7 
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SIGNAL DESCRIPTION FOR KEYBOARD INTERFACE 


B1-B7: 7 bit ASCII data from keyboard, positive logic (high level= 
"1"), TTL logic levels expected. 


GND: System circuit ground. @ Volt line from power supply. 
NC: No connection. 
RESET: System reset input. Requires switch closure to ground. 


STROBE: Strobe output from keyboard. The APPLE II recognizes the 
positive going edge of the incoming strobe. 


+5V: Positive 5-Volt supply. To avoid burning out the connector 
pin, current drain MUST be less than 19@mA. 


-12V: Negative 12-Volt supply. Keyboard should draw less than 
50mA. 


PERIPHERAL CONNECTORS 


The eight Peripheral Connectors mounted near the back edge of the 
APPLE II board provide a convenient means of connecting expansion 
hardware and peripheral devices to the APPLE II I/0 Bus. These are 
Winchester #2HW25CQ-111 (or equivalent) 59 pin card edge connectors 
with pins on .19" centers. Location and pin outs are illustrated in 
Figures | and 4. 


SIGNAL DESCRIPTION FOR PERIPHERAL 1/0 


A6-A15: 16 bit system address bus. Addresses are set up by the 


6502 within 340nS after the beginning of @,. These lines 
will drive up to a total of 16 standard TTL loads. 


DEVICE SELECT: Sixteen addresses are set aside for each peripheral 
connector. A read or write to such an address will 
send pin 41 on the selected connector low during B. 
(599nS). Each will drive 4 standard TTL loads. 


D6-D7: 8 bit system data bus. During a write cycle data is 
set up by the 6592 less than 30MnS after the beginning 
of @,. During a read cycle the 6592 expects data to 
be réady no less than 199nS before the end of p.- 
These lines will drive up to a total of 8 total low 
power schottky TTL loads. 


127 


OMA: Direct Memory Access control output. This line has a 
3K Ohm pullup to +5V and should be driven with an 
open collector output. 


DMA IN: Direct Memory Access daisy chain input from higher 
priority peripheral devices. Will present no more 
than 4 standard TTL loads to the driving device. 


DMA OUT: Direct Memory Access daisy chain output to lower 
priority peripheral devices. This line will drive 
4 standard TTL loads. 


GND: System circuit ground. 9@ Volt line from power supply. 


INH: Inhibit Line. When a device pulls this line low, all 
ROM's on board are disabled (Hex addressed D#~% through 
FFFF). This line has a 3K Ohm pullup to +5V and 
should be driven with an open collector output. 


INT IN: Interrupt daisy chain input from higher priority peri- 
pheral devices. Will present no more than 4 standard 
TTL loads to the driving device. 


INT OUT: Interrupt daisy chain output to lower priority peri- 
pheral devices. This line will drive 4 standard TTL 
loads. 

I/O SELECT: 256 addresses are set aside for each peripheral connector 


(see address map in "MEMORY" section). A read or write 
of such an address will send pin 1 on the selected 
connector low during 0. (500nS). This line will drive 
4 standard TTL loads. 


1/0 STROBE: Pin 20 on all peripheral connectors will go low during 
§. of a read or write to any address C8@@-CFFF. This 
1¢ne will drive a total of 4 standard TTL loads. 


IRQ: Interrupt request line to the 6592. This line has a 
3K Ohm pullup to +5V and should be driven with an open 
collector output. It is active low. 


NC: No connection. 


NMI: Non Maskable Interrupt request line to the 6592. This 
line has a 3K Ohm pullup to +5V and should be driven with 
an open collector output. It is active low. 


Q.: A MHz (nonsymmetrical) general purpose timing signal. Will 
drive up to a total of 16 standard TTL loads. 


RDY: "Ready" line to the 6592. This line should change only 
during §,, and when low will halt the microprocessor at 
the next READ cycle. This line has a 3K Ohm pullup to 
+5V and should be driven with an open collector output. 


RES: Reset line from "RESET" key on keyboard. Active low. Will 
drive 2 MOS loads per Peripheral Connector. 
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READ/WRITE line from 6502. When high indicates that a read 
cycle is in progress, and when low that a write cycle is 

in progress. This line will drive up to a total of 16 
Standard TTL loads. 


The function of this line will be described in a later 
document. 


Microprocessor phase J clock. Will drive up to a total of 
16 standard TTL loads. 


Phase 1 clock, complement of Vy: Will drive up to a total 
of 16 standard TTL loads. 


Seven MHz high frequency clock. Will drive up to a total 
of 16 standard TTL loads. 


Positive 12-Volt supply. 
Possitive 5-Volt supply 
Negative 5-Volt supply. 
Negative 12-Volt supply. 


POWER CONNECTOR 


The four voltages required by the APPLE IT are supp] ied via this 
AMP #9-35928-1,6 pin connector. See location and pin out in Figures 


1 and 5. 


PIN DESCRIPTION 


GND: 


+12V: 


+5V: 
-5V: 


-12V: 


(2 pins) system circuit ground. §# Volt line from power 
supply. 


Positive 12-Volt line from power supply. 
Positive 5-Volt line from power supply. 
Negative 5-Volt line from power supply. 


Negative 5-Volt line from power supply. 
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Figure 4 PERIPHERAL CONNECTORS 
(EIGHT OF EACH) 


TOP VIEW 
PINOUT (Back Edge of PC Board) 


25 +5V 
24 DMAOUT 
23 INT OUT 
22 DMA 

21 RADY 

20 1/0 STROBE 
19 NC. 

18 R/W 

17 A15 

16 A14 

15 A13 

14 A12 


s~OQA ODN ®W O 


VO SELECT 


( Toward Front Edge of PC Board) 
LOCATIONS J2 TO J12 


Figure 5 POWER CONNECTOR 


TOP VIEW 


PINOUT ( Toward Right Side of PC Board) 


(BLUE/WHITE WIRE) —12V -5V (BLUE WIRE) 


(ORANGE WIRE) +5V +12V (ORANGE/WHITE WIRE) 


(BLACK WIRE) GND GND (BLACK WIRE) 


LOCATION K1 
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SPEAKER CONNECTOR 


This is a MOLEX KK 199 series connector with two .25" square pins on 
19" centers. See location and pin out in Figures 1 and 6. 


SIGNAL DESCRIPTION FOR SPEAKER 


+5V : System +5 Volts 
SPKR: Output line to speaker. Will deliver about .5 watt into 
: 8 Ohms. 
Figure 6 
SPEAKER CONNECTOR 
x PINOUT 
> x 
‘ $f 
g 
ToT wW 
taj S$. 
cs 
» Oo 
© & 
© 
S&S. CO 
i. A. 
Right Edge of PC Board 
LOCATION B14A 


VIDEO OUTPUT JACK 


This standard RCA phono jack located at the back edge of the APPLE II 


P.C. board will supply NTSC compatible, EIA standard, positive composite 
video to an external video monitor. 


A video level control near the connector allows the output level to be 
adjusted from 9 to 1 Volt (peak) into an external 75 OHM load. 


Additional tint (hue) range is provided by an adjustable trimmer capacitor. 


See locations illustrated in Figure 1. 
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AUXILIARY VIDEO OUTPUT CONNECTOR 


This is a MOLEX KK 19% series connector with four .25" square pins 
on .19" centers. It provides composite video and two power supply 
voltages. Video out on this connector is not adjustable by the on 
board 200 Ohm trim pot. See Figures 1 and 7 


SIGNAL DESCRIPTION 
GND: System circuit ground. @ Volt line from power supply. 


VIDEO: NTSC compatible positive composite VIDEO. DC coupled 
emitter follower output (not short circuit protected). 
SYNC TIP is @ Volts, black level is about .75 Volts, and 
white level is about 2.9 Volts into 479 Ohms. Output level 
is non-adjustable. 


+12\V: +12 Volt line from power supply. 
-5V: -5 Volt line from power supply. 
Figure / AUXILIARY VIDEO OUTPUT CONNECTOR - 
Sue 
PINOUT Oo 
co 
| QO. 
0 | —5V q- 
| ‘o) 
"ao | VIDEO 
| ® 
ra | GND oS 
=Z 
O 
oO 


Right Edge of PC Board 


LOCATION J14B 
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INSTALLING YOUR OWN RAM 


THE POSSIBILITIES 


The APPLE II computer is designed to use dynamic RAM chips organized 
as 4096 x 1 bit, or 16384 x 1 bit called "4K" and "16K" RAMs 
respectively. These must be used in sets of 8 to match the system 
data bus (which is 8 bits wide) and are organized into rows of 8. 
Thus, each row may contain either 4096 (4K) or 16384 (16K) locations 
of Random Access Memory depending upon whether 4K or 16K chips are 
used. If all three rows on the APPLE II board are filled with 4K 
RAM chips, then 12288 (12K) memory locations will be available for 
storing programs or data, and if all three rows contain 16K RAM 
chips then 49152 (commonly called 48K) locations of RAM memory will 
exist on board: | 


RESTRICTIONS 


It is quite possible to have the three rows of RAM sockets filled with 
any combination of 4K RAMs, 16K RAMs or empty as long as certain rules 
are fol lowed: 


1. All sockets in a row must have the same type (4K or 16K) 
RAMs. 


2. There MUST be RAM assigned to the zero block of addresses. 


ASSIGNING RAM 


The APPLE II has 48K addresses available for assignment of RAM memory. 
Since RAM can be installed in increments as small as 4K, a means of 
selecting which address range each row of memory chips will respond 
to has been provided by the inclusion of three MEMORY SELECT sockets 
on board. 


Figure 8 

MEMORY SELECT SOCKETS 

TOP VIEW 

PINOUT 
(0000-OFFF) 4K “0” BLOCK 17 14 RAMROWC 
(1000-1FFF) 4K “1" BLOCK 2 13 RAM ROW D 
(2000-2FFF) 4K “2” BLOCK 3 12 RAM ROW E 
(3000-3FFF) 4K 3" BLOCK 4 11, NC. 
(4000-4FFF) 4K “4" BLOCK 5 10 16K “0” BLOCK (0000-3FFF) 
(S000-5FFF) 4K “5” BLOCK 6 9 16K “4” BLOCK (4000-7FFF) 
(2000-SFFF) 4K “6” BLOCK 7 8 16K “8” BLOCK (8000-BFFF) 


LOCATIONS D1, £1, F1 
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MEMORY 


TABLE OF CONTENTS 

1. INTRODUCTION 
INSTALLING YOUR OWN RAM 
MEMORY SELECT SOCKETS 


f& WwW DW 


MEMORY MAP BY 4K BLOCKS 
5. DETAILED MAP OF ASSIGNED ADDRESSES 


INTRODUCTION 


APPLE II is supplied completely tested with the specified amount of 
RAM memory and correct memory select jumpers. There are five different 
sets of standard memory jumper blocks: 


1. 4K 4K 4K BASIC 
2. 4K 4K 4K HIRES 
3. 16K 4K 4K 

4. 16K 16K 4K 

5. 16K 16K 16K 


A set of three each of one of the above is supplied with the board. 
Type 1 is supplied with 4K or 8K systems. Both type 1 and 2 are 
supplied with 12K systems. Type 1 is a contiguous memory range for 
maximum BASIC program size. Type 2 is non-contiguous and allows 8K 
dedicated to HIRES screen memory with approximately 2K of user BASIC 
Space. Type 3 is supplied with 16K, 29K and 24K systems. Type 4 
with 30K and 36K systems and type 5 with 48K systems. 


Additional memory may easily be added just by plugging into sockets 
along with correct memory jumper blocks. 


The 6502 microprocessor generates a 16 bit address, which allows 

65536 (commonly called 65K) different memory locations to be specified. 
For convenience we represent each 16 bit (binary) address as a 4-digit 
hexadecimal number. Hexadecimal notation (hex) is explained in the 
Monitor section of this manual. 


In the APPLE II, certain address ranges have been assigned to RAM 


memory, ROM memory, the I/O bus, and hardware functions. The memory 
and address maps give the details. 
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MEMORY SELECT SOCKETS 


The location and pin out for memory select sockets are illustrated 
in Figures 1 and 8. 


HOW TO USE 


There are three MEMORY SELECT sockets, located at Dl, E1 and Fl 
respectively. RAM memory is assigned to various address ranges by 
inserting jumper wires as described below. All three MEMORY SELECT 
sockets MUST be jumpered identically: The easiest way to do this 
is to use Apple supplied memory blocks. 


Let us learmby example: 


If you have plugged 16K RAMs into row "C" (the sockets located at 
C3-C1M on the board), and you want them to occupy the first 16K of 
addresses starting at 9999, jumper pin 14 to pin 19 on all three 
MEMORY SELECT sockets (thereby assigning row "C" to the Q999-3FFF 
range of memory). 


If in addition you have inserted 4K RAMs into rows "D" and "E", and 

you want them each to occupy the first 4K addresses starting at 4990 
and 5999 respectively, jumper pin 13 to pin 5 (thereby assigning row 
"D" to the 499-4FFF range of memory), and jumper pin 12 to pin 6 
(thereby assigning row "E" to the 5090-5FFF range of memory). Remember 
to jumper all three MEMORY SELECT sockets the same. 


Now you have a large contiguous range of addresses filled with RAM 
memory. This is the 24K addresses from O@90-5FFF. 


By following the above examples you should be able to assign each 
row of RAM to any address range allowed on the MEMORY SELECT sockets. 
Remember that to do this properly you must know three things: 

1. Which rows have RAM installed? 


2. Which address ranges do you want them to 
occupy? 


3. Jumper all three MEMORY SELECT sockets the 
same: 


If you are not sure think carefully, essentially all the necessary 
information is given above. 


Memory Address Allocations in 4K Bytes 


6000 
9000 


A000 
BOO00 


DO0O 


FOOO 


text and color graphics 
display pages, 6502 etack, 
pointers, etc. 


high res graphics display 
primary page 


addresses dedicated to 
hardware functions 
ee 


high res. graphics display 
secondary page 


ROM socket DO: spare 
ee 


ROM socket D8: spare 
hy 


ROM socket EO: BASIC 

ROM socket E8: BASIC 
ve 

ROM socket FO: BASIC 


utility 
ROM socket F8: monitor 


Memory Map Pages @ to BFF 


PAGE ZERO 
0000-O01F UTILITY register area for "sweet 16" 
16 bit firmware processor. 


0020-004D MONITOR 

004E-004F MONITOR | holds a 16 bit number that 
is randomized with each key 
entry. 


0050-0055 integer multiply and divide 
work space. 


0055-O0FF 
OOFO-— OOFF floating point work space. 


PAGE ONE 
0100-01FF subroutine return stack. 


character input buffer. 
MONITOR Y. (control Y) will cause 


a° JSR to this location. 


NMI‘s are vectored to this 
location. 


O3FE-O3FF IRQ's are vectored to the 
address pointed to by these 
locations. 


DISPLAY | text or color graphics 
primary page. 


DISPLAY text or color graphics BASIC initializes 
secondary page. LOMEM to location 
osoo. 
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1/0 and 80M Address Detail 


HEX 
ADDRESS ASSIGNED FUNCTION COMMENTS 


COOX 


CO1x 
CO2X 
CO3X 


CO4xX 


C050 
COS1 
C052 
C053 
C054 
C055 
C056 
C057 
C058 
C059 
COSA 
COSB 
COSC 
COS5D 
COSE 


COSF 


Keyboard strobe appears in bit 
7. ASCII data from keyboard 
appears in the 7 lower bits. 


Keyboard input. 


Clear keyboard strobe. 
Toggle cassette output. 
Toggle speaker output. 


Output strobe to Game I/0 
connector. 


Set graphics mode 
" text " 
Set bottom 4 lines graphics 
" " " " text 
Display primary page 
" secondary page 


Set high res. graphics 


" color " 

Clear "ANO" Annunciator O output to 
Game I/O connector. 

Set " 

Clear "AN1" Annunciator 1 output to 
Game I/O connector. 

Set " 

Clear "AN2" Annunciator 2 output to 
Game I/O connector. 

Set " 

Clear "AN3" Annunciator 3 output to 
Game I/O connector. 

Set " 
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HEX 
ADDRESS ASSIGNED FUNCTION COMMENTS 


State of "Cassette Data In" 
appears in bit 7. 

input on 
State of Switch 1 “\ Game 
I/O connector appears in bit 7. 


C060/8 Cassette input 


| C061/9 "Swi" 


"Swa" 


C062/A State of Switch 2 input on 
Game I/O connector appears 


in bit 7. 


C063/B "SW3" State of Switch 3 input on 
Game I/O connector appears 


in bit 7. 


Paddle O timer output State of timer output for 


Paddle O appears in bit 7. 


C064/C 


State of timer output for 
Paddle 1 appears in bit 7. 


C065/D 


CO66/E State of timer output for 


Paddle 2 appears in bit 7. 


State of timer output for 
Paddle 3 appears in bit 7. 


C067/F 


CO7X "PDL STB" Triggers paddle timers 


during Po - 


Pin 41 on the selected 
Peripheral Connector goes 
low during Q.- 


CO8X DEVICE SELECT 0 


CO9X 
COAX 
COBX 
COCX 


CODX 


COEX 


COFX 


C10X Expansion connectors, 


- © Oo Non F WO ND fF 
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HEX 
ADDRESS ASSIGNED FUNCTION COMMENTS 


DEVICE SELECT B " 


A] C 
tt D A 
tf E 1 
7% F tt 
I/O SELECT 1 Pin 1 on the selected 
Peripheral Connector goes 
" 2 low during Po- 
" 3 NOTES: 
1. Peripheral Connector 
" 4 0 does not get this 
Signal. 
S 2. I/O SELECT 1 uses the 
" G Same addresses as 
DEVICE SELECT 8-F. 
r qT 
" 8, I/O STROBE | Expansion connectors. 
'"! 9, ‘! 
" A, A 
te B, tf 
te C, es 
tt D, wf 
A E, iB 
? F, ? 
DOOO-D7FF | ROM socket DO Spare. 
D800-DFFF " M D8 Spare. 
EOOO-E7FF " " EO BASIC. 
E800-EFFF " " E8 BASIC. 
FOOO-F7FF " " FO 1K of BASIC, 1K of utility. 
F800-FFFF " " F8 Monitor. 
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SYSTEM TIMING 


SIGNAL DESCRIPTIONS 


14M: 


7M: 
COLOR REF: 
Do: 


Qi: 


D2: 


Q3: 


Master oscillator output, 14.318 MHz +/- 35 ppm. All other 
timing signals are derived from this one. 


Intermediate timing signal, 7.159 MHz. 
Color reference frequency used by video circuitry, 3.5389 MHz. 
Phase ¢ clock to microprocessor, 1.923 MHz nominal. 


Microprocessor phase 1 clock, complement of 9), 1.023 ‘iHlz 
nominal. 


Same as @). Included here because the 6502 hardware and 
programming manuals use the cesignation M2 instead of Mo. 


A general purpose timing signal which occurs at the same 
rate as the microprocessor clocks but is nonsymmetrical. 


MICROPROCESSOR OPERATIONS 


ADDRESS: 


DATA WRITE: 


DATA READ: 


TIMING CIRCUITRY 
BLOCK DIAGRAM 


MASTER 
OSCILLATOR 


TIMING 
CIRCUITRY 


The address from the microprocessor changes during @,, 
and is stable about 300nS after the start of Q@;. 


During a write cycle, data from the microprocessor 
appears on the data bus during 2, and is stable about 
300nS after the start of Qo. 

During a read cycle, the microprocessor will expect 


data to appear on the data bus no less than 100nS prior 
to the end of Qo. 


SYSTEM TIMING DIAGRAM 


TIMING RELATIONSHIPS 


REFERENCE 
OSCILLATOR 
AND 
SYSTEM 
TIMING 


vl , 
GENERATOR [9 Composite VIDEO OUT 


§ AUXILIARY VIDEO OUT 


FIG. S- 
IG. S-3 FIG. S-11 


SYNC 
J Fe 


— TIMING BUS 
ee Ge Oe OO 


Ci (sts‘(‘(‘(‘(‘CS; Cr rr 


ADORESS BUS —> 


TIMING BUS —+ 


MONITOR 
FIG. S-5 


MPU t 

AND - 

BUS >} Iw 

DRIVERS O| la POWER IN 
<1 12 +12V 
<x} iw +5V 
Oo; 1O —5V 
a} Iw 
5 Ww GND 
- Q 
3} 12 


DMA BUS —> 


8 DECODED 

PERIPHERAL 
PERIPHERAL CONNECTORS 
\/ 


+9 


4K/ 16K 
RAM 
SELECT 


DATA BUS <— —> 


OMA BUS 


— 


ADDRESS DECODE — 
ADDRESS BUS 


—— LATCHEDDATAOUT — 


AM 
ADDRESS 


ADDRES 49 GAME 1/0 


ae 

@ CASSETTE IN 
a oe 

® CASSETTE OUT 
a 

¢ KEYBOARD 
ae oe 

® SPEAKER 


ADDRESS BUS 


FIG. S-10 


<— DATA OUT 


<=— DMABUS 


FIGURE S-1 APPLE fi SYSTEM DIAGRAM 
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